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Introduction 



AMSTRAD CPC464 

La informatica ha evolucionado mucho en muy poco tiempo. De todas las innovaciones 
tecnologicas de este siglo, la informatica es seguramente la mas notable. 

Las caracten'sticas de los ordenadores, tanto en el aspecto mecanico y electronico (hard- 
ware) como en el de la programacion (software) avanzan tan deprisa que incluso a los usua- 
rios expertos les resulta dificil mantenerse al dia. Por consiguiente, harian falta miles de 
paginas para describir exhaustivamente el BASIC del CPC464, su sistema operativo y su 
hardware. 

Este manual es solamente una introduccion al CPC464 y a su software. Para complemetar- 
lo se han publicado numerosos libros y gufas de todo tipo que el usuario puede encontrar 
en librerias y tiendas de ordenadores. 

Los usuarios que ya conozcan otros dialectos de BASIC no encontraran ninguna dificultad 
en habituarse muy deprisa al AMSTRAD BASIC. Los demas apreciaran enseguida la es- 
tructura directa y clara de esta implementation del lenguaje, que ha sido disenada para ob- 
viar las ambigiiedades y el oscurantismo de otras versiones de BASIC. 

El manual se divide en varios capitulos. El primero es un 'Curso de introduccion', escrito 
para guiar al usuario en su primer contacto con el ordenador. En el segundo ofrecemos un 
ejemplo de conception y desarrollo de un programa. 

El tercer capitulo contiene la description completa y detallada de todas las ordenes y fun- 
ciones de AMSTRAD BASIC. 

En el capitulo cuarto, 'Para su referenda', damos diversa information tecnica. 

El capitulo cinco da un repaso a ciertas cuestiones basicas de la informatica, particulariza- 
das para el CPC464. 

Finalmente, el apendice 1 es un glosario de la terminologi'a informatica y un lexico ingles- 
castellano. 
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IMPORTANCE 



A lo largo de este manual vamos a utilizar la letra de tipo Univers negra para representar 
los caracteres que aparecen en la pantalla y los que el usuario debe introducir por el teclado. 
Los nombres de las teclas los escribiremos recuadrados; asi, por ejemplo, ["i ntroI indica que 
usted debe pulsar esta tecla, no escribir las letras I, N, T, R y O. 

1 . Para conectar el teclado, el monitor y la unidad modulador/fuente de alimentation a 
otros aparatos, siga escrupulosamente las instrucciones que damos en este manual y en 
los manuales de otros perifericos Amstrad. De lo contrario, el ordenador puede resul- 
tar seriamente danado y la garantfa quedara anulada. 

2. No intente conectar este equipo a una red de distribution de energia electrica que no 
sea de 220-240 V c.a., 50 Hz. 

3 . El mantenimiento que pueda hacer el usuario no requiere en ningiin caso acceder al in- 
terior de la carcasa. Asi pues, no abra nunca el equipo. Confie todas las reparaciones 
y operaciones de mantenimiento al servicio tecnico de Amstrad Espana. 

4. Para evitar la fatiga visual, ponga el monitor lo mas alejado posible del teclado y traba- 
je con luz ambiente adecuada. Deje el control de brillo del monitor lo mas bajo posible. 

5. No obstruya los orificios de ventilation. 

6. No utilice ni almacene el equipo a temperaturas demasiado altas ni demasiado bajas, 
ni en lugares hiimedos, polvorientos o sometidos a grandes vibraciones. 

7. Mantenga alejado del ordenador todo tipo de lfquidos (cafe, refrescos, etc.). El ordena- 
dor puede resultar gravemente danado si lo salpica con cualquier liquido. Si esto llega 
a ocurrir, consulte al servicio tecnico de Amstrad Espana. 

8. Cada vez que se apaga el ordenador, se pierden todos los datos y programas que pudie- 
ra haber en su memoria. Si desea grabar el programa antes de apagar el ordenador, 
consulte la Parte 6 del 'Curso de introduction'. 

9. Evite que el magnetofono y las cintas esten sometidos a la influencia de campos magne- 
ticos (altavoces, televisores, imanes, etc.). 

10. No apague el ordenador cuando haya una cinta en el magnetofono y este pulsado el 
boton PLAY (o REC y PLAY). 

1 1 . Aunque no apague el ordenador, no deje la cinta en el magnetofono mucho tiempo con 
el boton PLAY pulsado. 

12. Recomendamos el uso de cintas especiales para informatica. No obstante, las cintas de 
audio de buena calidad son igualmente adecuadas, a condition de que no sean de dioxi- 
do de cromo ni de 'metal' y de que su duration no sea superior a 90 minutos (C90). 
Para facilitar la localization de los programas, son aconsejables las cintas C12 (seis mi- 
nutos por cara). 
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13. Las cintas grabadas por otros ordenadores o fabricadas para ellos no pueden ser lefdas 
por el CPC464. 

14. Las cassettes tienen una «pestafla» en su extremo posterior; cuando se rompe esta pes- 
tafla, la cinta queda protegida contra escritura, es decir, no se puede grabar en ella. 
En tal caso, el boton REC del magnetofono no puede bajar y usted no debe tratar de 
forzarlo. Si desea grabar una cinta asi protegida, tape con cinta autoadhesiva el hueco 
que ha quedado al descubierto al romper la pestafia. 

15. Antes de grabar un programa, haga avanzar la cinta lo suficiente como para que el tra- 
mo de cinta de material no sensible (de color bianco o traslucido) quede bobinado y 
f rente a la cabeza quede material sensible (de color marron). 

16. El buen cuidado de las cintas y la limpieza periodica del magnetofono son necesarios 
para garantizar que la grabacion y lectura de los programas se realice libre de errores. 

17. En el zocalo de 'UNIDAD DE DISCO' de este ordenador se puede conectar diversos 
perifericos (por ejemplo, la unidad de disco DDI-1, el interfaz serie RS232C, etc.). Mu- 
chos de estos perifericos se reservan una pequefla portion de la memoria del ordenador. 
Algunos de los primeros programas publicados para el CPC464 aprovechan esta zona 
de memoria, y por lo tanto no pueden funcionar cuando se conectan los perifericos 
citados. 
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Capitulo 1 

Curso de introduccion 



Parte 1: Instalacion y mantenimiento 



El CPC464 puede ser instalado con: 

1. El monitor de fosforo verde AMSTRAD GT64. 

2. El monitor de color AMSTRAD CTM640. 

3. O la unidad modulador/fuente de alimentacion AMSTRAD MP1 conectada a un 
televisor de color (en UHF). 



Conexion del ordenador a la red 

El CPC464 solo se puede conectar a la red de 220-240V c.a., 50 Hz. 

Desenchufe la clavija de la toma mural siempre que no este utilizando el ordenador. 

No extraiga ningun tornillo ni trate de abrir la carcasa del ordenador, del monitor ni de 
la unidad MP1. Lea y respete las advertencias que se dan en la etiqueta de caracteristicas, 
que esta situada en la cara inferior de la carcasa del ordenador y de la fuente de 
alimentacion: 

Desconectar cuando no se utilice. 

;ATENCION! 

No manipular en su interior. 

y en la cara posterior de los monitores: 

NO ABRIR SIN ANTES DESCONECTAR 
LA TENSION DE RED. 
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Conexion del ordenador a un monitor 

(Si va a utilizar su CPC464 con la unidad MP1, no es necesario que lea esta section.) 

1 . Cerciorese de que el monitor no esta conectado a la red. 

2. Conecte el cable que sale de la cara frontal del monitor y termina en una clavija grande 
(DIN de 6 patillas) al zocalo posterior del ordenador marcado con MONITOR. 

3. Conecte el cable que sale de la cara frontal del monitor y termina en la clavija mas pe- 
quena al zocalo posterior del ordenador marcado con 5V c.c. 



Monitor 




Z6calo MONITOR , 
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Conexion del ordenador a la unidad 
modulador/fuente de alimentation MP1 



La MP1 es una unidad opcional que el usuario puede querer adquirir si esta utilizando ac- 
tualmente el CPC464 con el monitor de fosforo verde GT64. La MP1 permite conectar el 
CPC464 a un televisor de color domestico, para asi disfrutar de las posibilidades de color 
del CPC464. 

La MP1 se debe colocar inmediatamente a la derecha del CPC464. 

1. Cerciorese de que la MP1 no esta conectada a la red. 

2. Conecte el cable de la MP1 que termina en una clavija grande (DIN de 6 patillas) al zoca- 
lo posterior del ordenador marcado con MONITOR. 

3. Conecte el cable de la MP1 que termina en una clavija pequefta al zocalo posterior del 
ordenador marcado con 5V c.c. 

4. Conecte el cable que sale de la MP1 y termina en una clavija de antena a la entrada de 
antena de su televisor. 
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Encendido del sistema CPC464 con GT64 o con 
CTM640 

(Si va a utilizar su CPC464 con la unidad MP1, no es necesario que lea esta section.) 

Una vez conectado el sistema segiin se ha explicado en secciones anteriores, inserte la clavija 
de red en la toma mural. Para encender el sistema, pulse el boton ALIMENTACION que 
esta en la cara frontal del monitor, de modo que quede en position «ENC.». Si este boton 
esta en «APAG.», el suministro de corriente al resto del sistema queda interrumpido. 

Encienda el ordenador mediante el interruptor deslizante marcado con ALIMENTACION, 
que esta en su cara derecha. 

En este momento se debe encender el piloto rojo (ENC.) que esta en el centro del teclado; 
en el monitor se vera el siguiente mensaje: 



Anstrad G4K Micro computer- (si) 

©1984 flnstrad Consumer- Electronics vie 
and Locomotive Software Ltd. 

BASIC 1.0 

Keady 



Para evitar la fatiga visual excesiva, ajuste el control de brillo marcado con BRILLO al mi- 
nimo necesario para que el texto se vea comodamente, sin que deslumbre ni resulte borroso. 

El control BRILLO se encuentra en la parte inferior de la cara frontal del monitor GT64 
y en el lateral derecho del CTM640. 

En el caso del GT64, puede ser necesario ajustar los controles de contraste (CONTRASTE) 
y de fijacion del cuadro vertical (SINCRO. VERT.), que estan en el panel frontal. 

El mando de CONTRASTE se debe poner en el mfnimo compatible con la comoda visuali- 
zation de los textos. 
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Encendido del sistema CPC464 con la unidad 
modulador/fuente de alimentation MP1 

Una vez conectado el sistema segiin se ha explicado en secciones anteriores, inserte la clavija 
de red en la toma mural. Encienda el ordenador mediante el interruptor deslizante que esta 
en su lateral derecho. 

En este momento se debe encender el piloto rojo que esta en el centro del teclado. Ahora 
debe sintonizar el televisor para recibir las seflales del ordenador. 

Si su televisor tiene un selector de canales de botonera, pulse el boton correspondiente a 
un canal no utilizado. Ajuste el mando de sintonia siguiendo las instrucciones del manual 
del televisor (si dispone de un dial de sintonia, pruebe en las proximidades del canal 36) has- 
ta obtener la siguiente imagen: 



fimstrad 64K Microcomputer <sl> 

©1984 Anstrad Consumer Electronics pic 
and Locomotive Software Ltd. 

BASIC 1.0 

Ready 



Trate de conseguir la maxima nitidez posible. El texto aparecera en color amarillo dorado 
sobre fondo azul. 

Si el televisor tiene un selector de canales rotatorio, girelo hasta que pueda ver la imagen 
y esta sea estable (canal 36, aproximadamente). 



Otras conexiones . . . 



Si desea conectar otros perifericos, tales como 

Joystick(s) 

Impresora 

Amplificador o altavoces externos 

Dispositivos de expansion 

etcetera, 

al sistema basico, consulte la Parte 2 de este «Curso de introduction)). 
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Anomalias en el funcionamiento del sistema 



Al pulsar el interruptor de alimentation no se ilumina la pantalla 

— Apague el interruptor pulsandolo por segunda vez. 

— Desconecte el ordenador de la toma mural. 

— Enchufe en ella una lampara que usted sepa que funciona para comprobar que llega 
corriente. 

— Desconecte la impresora. 

— Si tiene instalado un interfaz RS232, desconectelo. 

— Vuelva a enchufar el ordenador en la toma mural; si hay algiin interruptor que con- 
trole el paso de corriente al enchufe, enciendalo. 

— Finalmente, vuelva a pulsar el interruptor de alimentacion. 
Si el problema persiste, consulte a su distribuidor. 



Limpieza 



Para la limpieza de la pantalla y el teclado recomendamos el uso de espumas antiestati- 
cas en aerosol. En ningiin caso se puede utilizar productos limpiadores espiritosos. 
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Parte 2: Conexion de los perifericos . . . 



En esta section vamos a explicar como se conectan al sistema CPC464 diversos perifericos, 
cuyo funcionamiento se explica en las correspondientes secciones de este manual. 



Joysticks (bastoncillos de mando) 

El joystick AMSOFT modelo JY1 es un aparato optional que el usuario puede desear ad- 
quirir si va a utilizar su CPC464 con programas de juegos disefiados para aprovechar las 
posibilidades de control y disparo del joystick. 

Conecte el cable procedente del joystick en el zocalo marcado con PUERTA DE USUARIO 

en el ordenador. El CPC464 admite dos joysticks; el segundo se conecta en el zocalo que 
hay en la peana del primero. 

En secciones posteriores de este manual daremos mas information sobre los joysticks. 



Impresora 



El CPC464 puede ser conectado a cualquier impresora de interfaz tipo Centronics. Para co- 
nectar el ordenador a la impresora AMSTRAD, basta con utilizar el cable suministrado con 
esta. 

Para conectar cualquier otra impresora de tipo Centronics se necesita el cable AMSOFT 
PL1. 

Inserte el extremo del cable que termina en un conector piano en el zocalo del ordenador 
marcado con IMPRESORA. 

Inserte el otro extremo del cable, que termina en el conector de tipo Centronics, en el zocalo 
de la impresora. Si la impresora tiene abrazaderas de seguridad, ffjelas en las ranuras que 
hay en los laterales del conector. 

Mas adelante daremos information sobre el manejo de la impresora. 
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Amplificador y altavoces externos 



El CPC464 puede ser conectado a un sistema de amplificador y altavoces estereofonicos, 
linica forma de apreciar plenamente las capacidades sonoras del ordenador. 

El cable de entrada al amplificador debe teminar en una clavija estereo de 3.5 mm, que se 
inserta en la hembra marcada con E/S en el panel posterior del ordenador. 

Las conexiones de la clavija deben ser las siguientes: 

Extremo de la clavija: canal izquierdo. 
Anillo intermedio: canal derecho. 
Cuerpo de la clavija: masa. 

El CPC464 entrega a la salida E/S una serial de nivel constante; asf pues, el volumen, el 
balance y el tono deben ser regulados con los mandos del amplificador externo. 

Tambien se puede conectar auriculares de alta impedancia, aunque el volumen no podra 
ser regulado por el mando de VOLUMEN del ordenador. Los auriculares de baja impedan- 
cia, que son los habitualmente utilizados con los equipos de alta fidelidad, no pueden ser 
conectados directamente al ordenador. 

Mas adelante explicaremos como enviar sonidos a cada uno de los tres canales del CPC464. 



Dispositivos de expansion 



Al ordenador CPC464 se le pueden conectar diversos dispositivos de expansion (unidad de 
disco, interfaz serie, modem, lapiz fotosensible, ROMs, etc.) por medio del zocalo marcado 
con UNIDAD DE DISCO que esta en la cara posterior del ordenador. 

Tambien se puede conectar en ese zocalo el amplificador/sintetizador de voz AMSOFT mo- 
delo SSA2. 

Las conexiones del zocalo UNIDAD DE DISCO se describen en el capftulo titulado 'Para 
su referenda . . . '. 
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Parte 3: Manos al teclado . . . 



Antes de empezar a cargar y grabar programas necesitamos familiarizarnos con algunas te- 
clas del ordenador. Si dene usted alguna experiencia en el manejo de los ordenadores, pue- 
de omitir la lectura de esta section. 

Encienda el ordenador y vera el mensaje initial en la pantalla. Vamos a explicar las funcio- 
nes de las diversas teclas: 



t 



I 



Las cuatro teclas que estan marcadas con sendas flechas son las 'teclas de movimiento del 
cursor'. Estas teclas sirven, pues, para mover el cursor por la pantalla. 

Pulselas todas ellas y practique hasta familiarizarse con su funcionamiento. 



INTRO 



INTRO 



Hay dos teclas INTRO . Ambas sirven para introducir en el ordenador lo que usted ha te- 
cleado. Una vez pulsada la tecla [Intro], el cursor salta automaticamente a la linea siguien- 
te de la pantalla. Siempre que escriba una orden directa o una instruction de programa, 
pulse Intro | al final. 



De ahora en adelante escribiremos ' [introT para indicar que se debe pulsar esta tecla al 
terminar de teclear ordenes o instrucciones de programa. 
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-BORR 



Esta tecla sirve para borrar el caracter (letra, niimero o signo) que esta a la izquierda del 
cursor. 

Teclee abed y observe que el cursor queda inmediatamente a la derecha de la letra d. Para 
borrar la d, pulse la tecla j^BORR j. Si la mantiene pulsada durante algiin tiempo, vera co- 
mo se borran tambien las otras tres letras. 



MAYS 



Hay dos teclas [mays!, una a ca( ^ a ^ a ^ del teclado. Si mantiene pulsada una de ellas al 
tiempo que pulsa una tecla literal (de letras), en la pantalla aparecera la correspondiente 
letra en mayiiscula. 

Escriba la letra e, pulse la tecla I' m ay s"! y, antes de soltarla, vuelva a escribir la e. En la 
pantalla vera lo siguiente: 

eE 

Escriba ahora unos cuantos espacios (manteniendo pulsada durante algiin tiempo la barra 
espaciadora). Para probar el efecto de [mays] con las teclas numericas, escriba el 2, pulse 
[mays] y, sin soltarla, vuelva a escribir el 2. En la pantalla aparecera lo siguiente: 



Haga pruebas con las diferentes teclas de caracteres para observar su efecto con y sin 
[mays I . 



FIJA 
MAYS 



Su efecto es en cierto modo similar al de -mays]. Con solo pulsarla una vez, las letras que 
se escriban a continuation apareceran en mayiisculas en la pantalla, pero, en cambio, las 
teclas numericas y de signos no resultan afectadas. 

Pulse FIJA mays i una sola vez y luego escriba lo siguiente: 
abcdef123456 
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En la pantalla aparecera: 

ABCDEF123456 

Observe que las letras han sido convertidas a mayusculas y que, sin embargo, los numeros 
no han sido convertidos a los signos que estan grabados en la parte superior de las teclas 
numericas. Para obtener estos signos se pulsa la tecla correspondiente en combinacion con 
(mays I . Escriba ahora lo siguiente, manteniendo pulsada la tecla [mays] : 

abcdef123456 

En la pantalla aparecera: 
ABCDEF!"#$%& 

Para volver a caracteres normales (en minusculas), pulse por segunda vez jfij a may's] . 



CTRL 



FIJA 
MAYS 



Si lo que desea es obtener letras mayusculas y los signos marcados en la parte superior de 
las teclas, sin tener que mantener pulsada la tecla may s , puede hacer lo siguiente: man- 
tenga pulsada la tecla [ctr l] y pulse | fija ma ys] una sola vez. Para comprobar el efecto de 
esta combinacion, escriba lo siguiente: 

a bcdef 123456 

En la pantalla aparecera: 

ABCDEF!"#$%& 

En esta situation, se puede escribir numeros utilizando el teclado numerico que esta a la 
derecha del teclado principal. 



Manteniendo pulsada la tecla [ctrlj al tiempo que se pulsa [FI JA mays] se vuelve al modo 
anterior (es decir, a minusculas o a bloqueo de mayusculas). Si el modo al que ha vuelto 
es a bloqueo de mayusculas, pulse [ fija maysj para retornar al modo normal, esto es, a mi- 
nusculas. 
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CLR 



Esta tecla borra el caracter que esta bajo el cursor. 

Escriba ABCDEFGH. El cursor ha quedado a la derecha de la ultima letra (la H). Pulse 
cuatro veces la tecla \^\. El cursor se ha movido cuatro posiciones hacia la izquierda, de 
modo que esta superpuesto a la letra E. 

Observe que la letra E es visible a traves del cursor. Pulse [clrI y observe como desaparece 
la letra E y como se mueven hacia la izquierda las letras FGH; bajo el cursor queda la F. 
Pulse durante unos instantes [c.lrJ: primero desaparece la F, y luego la G y la H. 



ESC 



Esta tecla se utiliza para abandonar una funcion que el ordenador este realizando. Si se pul- 
sa [esc; una vez, el ordenador interrumpe su tarea momentaneamente, y la reanuda si a 
continuation se pulsa cualquier otra tecla. 

Si se pulsa [esc] dos veces seguidas, el ordenador abandona definitivamente la tarea que es- 
ta realizando y queda a la espera de otras ordenes. 



Importante 



Cuando se han escrito 40 caracteres en una linea, el cursor esta en el extremo derecho de 
ella; el siguiente caracter aparecera automaticamente al principio de la linea siguiente. Esto 
significa que no se debe pulsar [jntro], a diferencia de lo que se haria si se estuviera traba- 
jando con una maquina de escribir, en la que se ha de teclear el retorno del carro al acercar- 
se al final de cada linea. 

El ordenador realiza esta funcion automaticamente; ante un [JntroJ indebido, reaccionara 
con un mensaje de error, generalmente Syntax error, bien en el acto o bien mas tarde, 
cuando se ejecute el programa. 
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Syntax error (error de sintaxis) 

Cuando en la pantalla aparece el mensaje Syntax error, el ordenador esta diciendo que 
no ha entendido la orden que se le ha dado. 
Por ejemplo, escriba 

printt jiNTROJ 

En la pantalla aparecera el mensaje: 

Syntax error 

Esto ocurre porque el ordenador no entiende la instruccion printt. 
Si el mismo error se comete en una linea de programa, tal como 

10 printt "abc" [Intro] 

en mensaje Syntax error no aparece hasta que se ejecuta el programa. Escriba: 

run INT RO 

(Esta orden pide al ordenador que ejecute el programa que tiene en este momento almace- 
nado en la memoria.) En la pantalla aparece: 

Syntax error in 10 
10 printt "abc" 

Este mensaje indica en que linea se ha detectado el error y exhibe la linea con el cursor ya 
preparado para que el usuario pueda corregirla. 

Lleve el cursor, con la tecla Q, hasta una letra t de printt. Pulse [clr] para borrar la t que 
sobra y luego pulse ITntr o para introducir la linea corregida en el ordenador. 

Escriba ahora: 

run [iNTROi 
El ordenador ha entendido la instruccion; de hecho, ha escrito en la pantalla: 

abc 
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Parte 4: Carga de programas 



La cinta de bienvenida 



Encajada en uno de los bloques de poliestireno del embalaje, viene una cinta de demostra- 
cion. Abra la puerta del magnetofono pulsando el boton [STOP/EJECT]. Inserte el casset- 
te tal como se indica en la figura, con la cara 'SIDE 1' hacia arriba. 




Cierre la puerta hasta que encaje. Pulse el boton [REW] para rebobinar la cinta hasta el 
principio (si no esta ya rebobinada). Cuando se pare la cinta, pulse el boton [STOP/EJECT]. 
Ponga a 000 el contador pulsando INICIO. 

Ahora pulse la tecla de 'control', ICTRLl , y, antes de soltarla, pulse tambien la tecla I NTRO | 
pequefia que esta en el extremo inferior derecho del teclado numerico. La pantalla responde 
de la siguiente manera: 

RUN" 

Press PLAY then any key: 

Este ultimo mensaje ('Pulse PLAY y luego cualquier tecla') indica que se debe pulsar el bo- 
ton [PLAY] del magnetofono y despues una tecla cualquiera en el teclado del ordenador. 
Por 'una tecla cualquiera' se debe entender, aqui y en lo sucesivo, cualquier tecla menos 
las siguientes: [mays], [ hja mays ], [ctr l y [esc]. 

Hecho esto, la cinta empieza a moverse. Al cabo de unos segundos aparece en la pantalla 
el siguiente mensaje: 

Loading WELCOME 1 block 1 
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('Cargando WELCOME 1 bloque 1'). El proceso de carga dura unos cinco minutos. Duran- 
te este tiempo el numero de bloque va cambiando a 2, 3, etc. La ejecucion del programa 
comienza cuando se para la cinta. Observe la demostracion. El programa se repite una vez 
y otra; para detenerlo, pulse esc] dos veces. Ahora ya puede pulsar el boton [STOP], sa- 
car la cinta y darle la vuelta. 

Antes de cargar el programa de la segunda cara, no olvide rebobinar la cinta (boton 
[REW]). 



Igual que antes, pulse CTRLijlNTROi pequena. En la pantalla aparece otra vez lo siguiente: 

RUN" 

Press PLAY then any key: 

Pulse [PLAY] en el magnetofono y una tecla cualquiera en el teclado del ordenador. 

La cinta empieza a mo verse. Al cabo de unos segundos aparece en la pantalla el siguiente 
mensaje: 

Loading WELCOME 2 block 1 

('Cargando WELCOME 2 bloque 1'). El programa le invitara a participar en la demostra- 
cion. Siga las instrucciones que le vaya dando. 



Carga de otros programas 



Estos dos programas, WELCOME 1 y WELCOME 2, son programas protegidos; esto quie- 
re decir que la unica forma de ejecutarlos es la descrita (carga y ejecucion inmediata). Sin 
embargo, los programas de BASIC no protegidos pueden ser cargados tambien por los si- 
guientes metodos. 

Rebobine la cinta ([REW]) hasta que deje de girar y entonces pulse el boton 
[STOP/EJECT]. 

Reinicialice el ordenador: para ello, pulse jCTr II y ;MAYSj y, antes de soltarlas, pulse [escj. 
La pantalla se borra y en ella aparece el mensaje de presentacion inicial, exactamente igual 
que si se acabase de encender el ordenador. 

En las siguientes instrucciones, [ intro; significa que se debe pulsar la tecla 'INTRO' al ter- 
minar de escribirlas. El simbolo " se obtiene con [ mays] y la tecla del 2 de la fila superior 
del teclado. 

Escriba lo siguiente: 

load "" INTRO] 
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El ordenador le pide entonces que 

Press PLAY then any key: 

('Pulse PLAY y luego cualquier tecla'). Asi pues, pulse el boton [PLAY] del magnetofono, 
ejerciendo la presion necesaria para que quede encajado. Despues pulse una tecla cualquie- 
ra en el ordenador. 

La cinta empieza a moverse y en la pantalla aparece poco despues el siguiente mensaje: 
Loading {nombre del programs) block 1 

('Cargando . . . bloque . . .). El niimero de bloque aumenta hasta un maximo que depende 
de la longitud del programa. Cuando se termina de cargar el programa, el ordenador emite 
el mensaje: 

Ready 

Tambien se puede especificar el nombre del programa que se desea cargar: 

load "{nombre)" [[ntroTj 
Nuevamente el ordenador pide que 

Press PLAY then any key: 

('Pulse PLAY y luego cualquier tecla'). Pulse el boton [PLAY] del magnetofono, ejerciendo 
la presion necesaria para que quede encajado. Despues pulse una tecla cualquiera en el 
ordenador. 

La cinta enpieza a moverse. Si el programa elegido no esta al principio, el ordenador conti- 
niia examinando la cinta hasta que lo encuentra. Por lo tanto se debe procurar escribir co- 
rrectamente el nombre del programa. 

Mientras el ordenador esta buscando un programa en una cinta, puede ocurrir que encuen- 
tre otro distinto. En tal caso informara del hecho mediante el mensaje: 

Found {otro nombre) block 1 

('Encontrado . . . ') pero no lo cargara, sino que seguira buscando hasta que encuentre el 
solicitado o se pulse la tecla [esc]. 

Cuando encuentra el programa que esta buscando, el ordenador emite el mensaje: 
Loading {nombre) block 1 

('Cargando . . . bloque ...'). El niimero de bloque aumenta hasta que concluye el proceso 
de carga y en la pantalla aparece el mensaje: 

Ready 
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Si antes de cargar el programa habia algiin otro en la memoria, sera sustituido por el recien 
cargado. 

Advertencia. Si al intentar cargar un programa se pulsa accidentalmente [REC] (ademas 
de [PLAY]) en el magnetofono, este se pone en modo de grabacion, no de lec- 
tura, y borra la cinta. Puesto que en esta situation el ordenador no puede en- 
contrar el programa que esta buscando, continuara borrando hasta el final 
de la cinta o hasta que se pulse la tecla [esc] . Le sugerimos que proteja las 
cintas (despues de grabarlas) rompiendo la «pestana» de plastico que hay en 
el borde posterior del cassette (una para cada cara). 

Una vez cargado el programa por alguno de estos dos ultimos procedimientos, para ponerlo 
en marcha se da la orden: 



run [introJ 
Tambien se puede ordenar la ejecucion directa del programa: 



run | INTRO 

El ordenador responde con el mensaje habitual: 

Press PLAY then any key: 

Una vez pulsado el boton [PLAY] del magnetofono y una tecla cualquiera del teclado, el 
ordenador carga el primer programa que encuentra en la cinta y lo ejecuta en cuanto termi- 
na de cargarlo. El proceso de carga se puede interrumpir en cualquier momento pulsando 

fESCl. 



Cintas de programa pregrabadas 

Las instrucciones que hemos dado en la section anterior son aplicables a la carga y ejecu- 
cion de los programas que el usuario puede adquirir en el comercio grabados en cinta. 

No obstante, siempre conviene leer y seguir las instrucciones de carga que se den en el folle- 
to que normalmente acompafia a las citadas cintas. 



Errores de lectura 



Si durante la carga de un programa o de un fichero de datos el ordenador emite el mensaje 
Read error ('error de lectura'), la cinta continua funcionando y el ordenador sigue leyendo 
bloques, pero no los carga mientras no encuentre el bloque niimero 1 del programa que se 
le habia pedido que cargase. 
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Cuando se produce un error de lectura lo que se debe hacer es parar la cinta ([STOP/EJECT]), 
rebobinarla ([REW]) y pulsar [PLAY] otra vez. El ordenador hara entonces un nuevo 
intento. 

Los errores de lectura se pueden producir por diversas causas. Por ejemplo, por el deterioro 
accidental de la cinta o de su superficie sensible o por haber apagado el ordenador estando 
la cinta en el magnetofono y el boton [PLAY] (o [REC] y [PLAY]) pulsado. 

En efecto, cuando esta pulsado este boton, la cinta esta presionada contra la cabeza graba- 
dora; al apagar el ordenador y descargarse la fuente de alimentation, puede pasar un impul- 
so electrico hacia la cinta a traves de la cabeza. Aunque la cinta este parada, ese impulso 
(lo mismo que el que se produce al encender el ordenador) puede alterar la information que 
esta grabada en la cinta. Por otra parte, la cinta puede deformarse si se la deja demasiado 
tiempo oprimida entre el eje de arrastre y la rueda de caucho. 

Los errores de lectura tambien se pueden producir si se pulsa [PAUSE] durante la lectura 
(o si se pulso este boton durante la grabacion), o si la cinta ha sido grabada en otro CPC464 
en el que la cabeza grabadora estuviera mal alineada. 

Finalmente, a veces se presentan errores de lectura sin causa aparente. La cinta de cassette 
no fue disenada originalmente como medio de almacenamiento de datos digitales, y por lo 
tanto no es perfecta en esta aplicacion. Hay razones fisicas que limitan la velocidad a la 
que se puede grabar datos en la cinta. Si se intenta sobrepasar esa velocidad maxima (por 
ejemplo, en los metodos de duplication masiva de cintas de programas de bajo precio), las 
grabaciones dejan de ser fiables. 

Nota. Las cintas grabadas por o para ordenadores de otras marcas no pueden ser leidas 
por el CPC464. Pueden tener el mismo aspecto externo, e incluso producir los mismos rui- 
dos cuando se las reproduce en un sistema de audio, pero los datos estaran grabados con 
un formato incompatible en el CPC464. 



Catalago de los ficheros de la cinta 



La orden CAT hace que el ordenador examine la cinta y de una lista de los ficheros que 
encuentra en ella. La forma es la siguiente: 

CAT INTRO 

Press PLAY then any key: 

La lista consiste en los nombres de los ficheros, seguido cada uno por el numero de bloques 
de que consta y por un caracter que indica la naturaleza del fichero: 

$ para programas de BASIC en forma estandar 
% para programas de BASIC protegidos 
* para ficheros de texto ASCII 
& para ficheros binarios 
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El mensaje Ok al final de cada linea indica que el fichero es legible y que el ordenador ha- 
bn'a podido cargarlo si lo hubiese intentado. 

La obtencion del catalogo con CAT no afecta en absoluto al programa que pueda haber 
en la memoria del ordenador. 
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Parte 5: Empecemos a trabajar 



A estas alturas ya sabemos que podemos y que no podemos hacer con el ordenador, asi co- 
mo la forma de conectarle perifericos. Sabemos para que sirven algunas teclas del ordena- 
dor y como cargar programas. Ahora vamos a ver algunas de la or denes e instrucciones que 
usted puede teclear para que empiecen a ocurrir cosas .... 

Al ordenador le ocurre lo que a los humanos: solo puede entender instrucciones que se le 
dan en el lenguaje que el conoce. En el caso del ordenador, ese lenguaje es BASIC (siglas 
de Beginners' All-purpose Symbolic Instruction Code, 'codigo de instrucciones simbolicas 
de uso general para principiantes'). Las palabras del vocabulario de BASIC son la llamadas 
'palabras clave', 'palabras reservadas' o 'palabras de instruction'. Cada una de ellas orde- 
na a la maquina que realice una determinada funcion. Todos los lenguajes tienen sus reglas 
gramaticales, y BASIC no es la exception. Aqui, el concepto de gramatica se reduce al de 
'sintaxis'; de ahi que el ordenador tenga la amabilidad de decirnos de vez en cuando que 
hemos cometido un error de sintaxis: Syntax error. 



Introduction a las palabras clave del BASIC de 
AMSTRAD 



En el tercer capitulo, titulado 'Lista completa de las palabras clave del BASIC de ASM- 
TRAD', daremos una description de todas las palabras del dialecto de BASIC que entiende 
este ordenador. En esta section vamos a presentar solo las que se utilizan con mayor 
frecuencia. 



CLS 

Para borrar la pantalla escriba: 

Cls [JNTROJ 

Como puede observar, la pantalla efectivamente se borra y en su extremo superior izquier- 
do aparecen la palabra Ready y el cursor ■ . 

Para introducir palabras clave de BASIC valen tanto las letras mayiisculas como las minus- 
culas. 
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PRINT 

Esta instruction sirve para hacer que el ordenador escriba en la pantalla caracteres sueltos, 
palabras completas, frases o numeros. Teclee la siguiente orden: 



print "hola" [introI 

En la pantalla puede ver: 

hola 

Las comillas " " indican al ordenador que es lo que debe escribir. La palabra hola aparecio 
en la pantalla en cuanto se pulso [Intro! . Teclee 



els [Intro i 



para borrar la pantalla. 



RUN 

En el ejemplo anterior hemos visto como obedece el ordenador una orden directa. Pero esto 
no siempre es deseable, ya que el ordenador olvida la orden inmediatamente despues de eje- 
cutarla. Podemos almacenar en la memoria del ordenador una sucesion de instrucciones pa- 
ra que mas tarde sean ejecutadas en un orden determinado. Tal sucesion de instrucciones 
constituira un programa. Las instrucciones de BASIC que podemos incluir en un programa 
tienen la forma que hemos visto, pero van precedidas de un numero de li'nea. Si el programa 
consta de mas de una instruction, los numeros de linea indican al ordenador en que orden 
debe ejecutarlas. Cuando despues de teclear una linea de instruction se pulsa [Intro ! , 
la linea queda almacenada en la memoria hasta que pidamos al ordenador que ejecute el 
programa. Escriba lo siguiente: 



10 print "hola" j intro 

Observe que en este caso, aunque ha pulsado [Intro , la palabra hola no ha aparecido en 
la pantalla, sino que ha quedado almacenada en la memoria del ordenador, incluida en la 
linea de programa. Para ejecutar este pequeno programa debemos dar al ordenador la or- 
den directa run. Escriba 

run [i ntro! 

Ahora si aparece la palabra hola en la pantalla. 

Observe algo interesante: en lugar de escribir la palabra print completa, basta con teclear 
el signo de interrogation ?; por ejemplo, 

10 ? "hola" [intro! 
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LIST 

Cuando se tiene un programa almacenado en la memoria, se puede comprobar su contenido 
haciendo un 'listado'. Escriba 

list | INTRO 

En la pantalla aparece 

10 PRINT "hola" 

que es la unica linea de nuestro programa. 

Observe que ahora la palabra PRINT esta en mayusculas. Esto nos indica que el ordenador 
ha reconocido PRINT como palabra clave de BASIC. 

Escriba els [Intro] para borrar la pantalla. Observe que, aunque se ha borrado el texto que 
habi'a en la pantalla, el programa sigue estando en la memoria del ordenador. 

GOTO 

Esta instruction pide al ordenador que salte de la linea actual a la linea especificada, para 
no ejecutar un grupo de instrucciones, si el salto es hacia delante, o para formar un bucle, 
si el salto es hacia atras. Escriba 

10 print "hola" Qntro] 
20 goto 10 [Yntro 

y luego 

run liNTRO] 

Como puede ver, el ordenador escribe repetidamente la palabra hola, a la izquierda de la 
pantalla, pasando cada vez a la linea siguiente. La razon es que, al llegar a la linea 20, la 
instruction goto 10 provoca un salto a la linea 10. 

Para detener el programa, pulse QeJSC] una vez. Para reanudarlo, pulse cualquier otra tecla. 
Para detenerlo definitivamente, de forma que se pueda introducir otras instrucciones, pulse 
I esc | dos veces. 

Escriba ahora 



els I INTRO I 



para borrar la pantalla. 
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Para inhibir el salto a la linea siguiente de la pantalla cada vez que el ordenador escriba 
hola, introduzca nuevamente el programa anterior, pero poniendo ahora un signo de punto 
y coma (;) al final de las comillas: 

10 print "hola"; [Intro] 
20 goto 10 [Intro! 
run Tntro] 

El punto y coma indica al ordenador que debe escribir el siguiente grupo de caracteres inme- 
diatamente a la derecha del anterior (suponiendo que quepan en la misma linea). 

Para detener este programa pulse rfsc] dos veces. Escriba otra vez la linea 10, pero ponien- 
do una coma (,) en lugar del punto y coma (;): 



10 print "hola", [intro] 
run INTRO : 

Como puede observar, la coma ha indicado al ordenador que escriba el siguiente grupo de 
caracteres 13 posiciones a la derecha del lugar en que empezo a escribir el anterior. Esta 
funcion es util cuando se quiere visualizar information en columnas. No obstante, si el nu- 
mero de caracteres del grupo es mayor que 12, la escritura empezara otras 13 posiciones 
mas a la derecha, de forma que entre columnas siempre quedara algun espacio. 

Este mimero, 13, es modificable con la instruction ZONE, que describiremos mas adelante. 

Para detener este programa, pulse ESC dos veces. Para borrar completamente la memoria 
del ordenador, pulse las teclas [CTRL] y [mays] y, antes de soltarlas, pulse [esc!. 



INPUT 

Esta instruction hace que el ordenador quede a la espera de que el usuario introduzca infor- 
mation por el teclado; por ejemplo, en respuesta a alguna pregunta. 

Escriba lo siguiente: 



10 input "cuantos anos tienes";edad [i ntro] 

20 print "pues no aparentas tener";edad;"anos" [intro 

run [Intro] 

En la pantalla aparece la pregunta: 

cuantos ahos tienes? 

Escriba su edad y pulse [JjviTROj. Si, por ejemplo, su edad es 18 anos, el programa escribe 
lo siguiente: 

pues no aparentas tener 18 anos 
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Este ejemplo ilustra la utilization de input combinada con una variable numerica. Hemos 
puesto la palabra edad al final de la linea 10, y por consiguiente en la memoria, para que 
el ordenador pueda asociarla al numero que el usuario introduzca; despues, en la linea 20, 
en lugar de edad escribira ese numero. Nada nos obligaba a elegir precisamente ese nom- 
bre, edad, y podiamos haber utilizado una letra cualquiera, por ejemplo, b. 

Reinicialice el ordenador para borrar la memoria (teclas |ctrl| mays ] |esc| ). Si queremos 
captar por el teclado una respuesta que este formada por caracteres cualesquiera (letras so- 
las o letras mezcladas con numeros), debemos poner el signo de dolar ($) al final del nombre 
de la variable. Las variables de este tipo son las que denominamos variables literates. 

Escriba el siguiente programa (observe que en la linea 20 hay que poner un espacio despues 
de la primera coma, pero no antes de la segunda): 

10 input "como te llamas";nombre$ intro j 

20 print "hola, ";nombre$;", yo me llamo Rolando" [Tntro] 

run intro] 

En la pantalla puede ver: 

como te llamas? 

Escriba su nombre y luego pulse [intro . Si el nombre introducido es, por ejemplo, Mano- 
lo, el programa escribe: 

hola, Manolo, yo me llamo Rolando 

En este caso hemos usado nombre$ como nombre de la variable literal, pero perfectamente 
podriamos haber elegido una letra cualquiera, por ejemplo, a$. Vamos a combinar los dos 
ejemplos anteriores en un solo programa. 

Reinicialice la maquina con [ctrl] [ mays [esc] . Escriba lo siguiente: 

5 els [iNTRO] 

10 input "como te llamas";a$ [Tntro] 

20 input "cuantos arios tienes";b in tro] 

30 print "desde luego, ";a$;", no aparentas tener";b;"afios" [intro] 

run [intro | 



En este programa hemos utilizado dos variables: a$ para representar el nombre y b para 
representar la edad. En la pantalla aparece la primera pregunta: 

como te llamas? 

Escriba su nombre (supongamos que es Manolo) y luego pulse [Intro] . El ordenador Ie 
pregunta ahora: 

cuantos arios tienes? 
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Escriba su edad (supongamos que es 18 anos) y luego pulse [Intr o i. 

Si lo que hemos supuesto es cierto, en la pantalla aparecera la siguiente frase: 

desde luego, Manolo, no aparentas tener 18 anos 



Edition de programas 



Si alguna de las lineas del programa anterior hubiera sido mecanografiada incorrectamente, 
lo que podria provocar el mensaje de error Syntax error o algun otro, en lugar de escribirla 
de nuevo es posible corregirla ('editarla' es como se dice en informatica). Para ilustrar co- 
mo hacerlo, vamos a escribir incorrectamente el programa: 

5 ClSS | I NTRO] 

10 input "como t llamas";a$ [Intro ! 

20 input "cuantos anos tienes";b [Intro] 

30 print "desde luego, ";a$;", no aparentas tener";b;"anos" [intro] 

En este programa hay tres errores: 

En la linea 5 hemos escrito ciss en lugar de els. 

En la linea 10 hemos escrito t en lugar de te. 

En la linea 30 hemos olvidado poner un espacio entre la coma y el signo de cerrar comillas. 

Hay tres metodos para corregir un programa. El primero consiste en escribir nuevamente 
la linea erronea. Al hacerlo, la linea nueva sustituye a la que habia en la memoria con el 
mismo numero. 

El segundo es el 'metodo del cursor de edition'. 

El tercero es el 'metodo del cursor de copia'. 



Metodo del cursor de edition 

Vamos a corregir el error de la linea 5. 
Escriba lo siguiente: 



edit 5 | intro] 

En la pantalla aparece la linea 5, por debajo de la 30, con el cursor situado sobre la c de 
ciss. 
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Para suprimir la s que sobra, pulse la tecla de movimiento del cursor h*J hasta que este que- 
de sobre la ultima s de clss; pulse la tecla [clr ] y observe como desaparece la s. 

A continuation pulse [In tro; para introducir la version corregida de la linea 5 en la memo- 
ria. Escriba 

list [Intro! 



y comprobara que la linea ha quedado corregida. 



Metodo del cursor de copia 



El cursor de copia es un segundo cursor, distinto del que puede ver en este momento en 
la pantalla, que aparece cuando se pulsa MAY S en combination con alguna de las teclas de 
movimiento del cursor. De esta forma, el cursor de copia se separa del cursor ordinario y 
puede ser llevado a cualquier lugar de la pantalla. 

Para corregir los errores de las lineas 10 y 30, pulse la tecla [m ays] y, sin soltarla, pulse [Y\ 
hasta llevar el cursor de copia al principio de la linea 10. Observe que el cursor principal 
no se ha movido, por lo que hay dos cursores en la pantalla. Ahora pulse varias veces 
COPIA hasta que el cursor de copia este sobre el espacio que hay entre la t y la palabra lla- 
mas. Observe que el principio de la linea 10 ha sido copiado en la ultima linea de la pantalla 
y que el cursor principal se ha detenido en la misma columna que el de copia. Escriba la 
letra e, que aparecera solamente en la linea inferior. 

El cursor ordinario se ha movido, pero el de copia se ha quedado donde estaba. Pulse ahora 
Icopia ] hasta completar la copia de la linea 10. Pulse [ INTRO para transferir esta version de 
la linea 10 a la memoria. El cursor de copia desaparece y el cursor ordinario queda por de- 
bajo de la nueva linea 10. 

Para corregir el otro error, mantenga pulsada la tecla [mays] y lleve el cursor de copia con 
la tecla |Tj hasta el principio de la linea 30. Pulse [co pia] hasta que el cursor de copia quede 
sobre las comillas que siguen a la coma. Pulse la barra espaciadora una vez, con lo que se 
inserta un espacio en la linea nueva. Pulse [co pTa] y no la suelte hasta que haya terminado 
de copiar el resto de la linea 30; pulse entonces [INTRO J. 

Compruebe que el programa ha quedado correctamente almacenado en la memoria 
escribiendo: 



list INTRO 



Nota. Para llevar el cursor (durante el proceso de edition) al principio o al final de una li- 
nea, pulse la tecla o la ^ una vez manteniendo pulsada al mismo tiempo la tecla | ctrl| . 



Reinicialice el ordenador con [CTRL] Smaysj Qescj 
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IF 

Las palabras clave IF (si) y THEN (entonces) se combinan para hacer que el ordenador reali- 
ce una determinada action en funcion del resultado de una comprobacion especificada. Por 
ejemplo, en la instruction 

if 1+1=2 then print "correcto" [intro] 

el ordenador comprueba si es cierto que 1 + 1=2 y obra en consecuencia. 

La palabra clave ELSE (si no) da un segundo curso de action para el caso de que la compro- 
bacion de como resultado 'falso' (o sea, que la condition no se cumpla). Por ejemplo, 

if 1 + 1=0 then print "correcto" else print "falso" intro! 

Vamos a ampliar nuestro programa anterior con la instruction IF . . . THEN. Escriba lo 
siguiente: 



5 ClS I INTRO I 



10 input "como te llamas";a$ [Intro 

20 input "cuantos anos tienes";edad j intro 

30 if edad < 13 then 60 [Intro] 

40 if edad < 20 then 70 |intro| 



50 if edad > 19 then 80 ITntro] 

60 print "Bueno, ";a$;", todavia no eres un adolescente a los";edad; 
"anos":end I introI 



70 print "Bueno, ";a$;", a tus";edad;"anos eres un adolescente":end [jntroJ 
80 print "Que le vamos a hacer, ";a$;", ya no eres un adolescente a 
tus";edad;"afios" | intro] 

(Observe que hemos introducido dos simbolos nuevos: <, que significa 'menor que', y >, 
que significa 'mayor que'.) Para comprobar que el programa ha quedado correctamente 
introducido en la memoria escriba 



list 1 INTRO | 

y a continuation 



run intro 



Responda a las preguntas que le haga el ordenador y vea que ocurre. 

En este ejemplo puede observar el efecto de la instruction IF . . . THEN. Tambien hemos 
introducido una palabra clave nueva: END (fin); su efecto es concluir la ejecucion del pro- 
grama. Si no estuviera END en la linea 60, el programa continuaria en la linea 70. Por lo 
mismo, si no hubieramos puesto END en la linea 70, el programa no terminaria en ella, 
sino que ejecutaria tambien la 80. El signo de dos puntos (:) que precede a la palabra END 
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separa esta palabra de la instruction anterior. Este signo se puede utilizar para separar ins- 
tructions cuando interese poner varias en una misma linea de programa. Tambien hemos 
incluido la linea 5, en la que borramos la pantalla. En lo sucesivo seguiremos haciendolo, 
para obtener programas mas 'elegantes' y evitar confusiones. 

Reinicialice la maquina pulsando las teclas [ctrl] [mays] [esc]. 



FOR . . . NEXT 

Estas palabras clave se utilizan cuando se desea que una parte del programa se repita cierto 
numero de veces. Las instrucciones que deban repetirse son las que se incluyen dentro del 
bucle FOR ... NEXT (para . . . siguiente). 

Escriba lo siguiente: 

5 Cls [JNTROJ 

10 for a = 1 to 10 [introJ 

20 print "operacion numero:";a LuvTfROJ 

30 next a [TN_f.Ro] 

run jjNjROJ 

Como puede ver, la action de la linea 20 ha sido realizada 10 veces, tal como exige la ins- 
truction FOR de la linea 10. Observe tambien como se ha ido incrementando de 1 en 1 la 
variable a. 

La palabra clave STEP (paso) se puede incluir en la instruction FOR . . . NEXT para especi- 
ficar la forma en que debe incrementarse o decrementarse la variable de control del bucle. 
Por ejemplo, modifique la linea 10 y ejecute el programa: 

10 for a = 10 to 50 step 5 [Intro. 

El paso tambien puede ser negativo. Por ejemplo: 

10 for a = 100 to step -10 [introj 
run [iNTROj 

REM 

REM es abreviatura de REMark (observation, comentario). Esta instruction indica al orde- 
nador que debe ignorar todo lo que haya despues de ella en la linea de programa. Sirve, 
pues, para hacer anotaciones al programa; por ejemplo, el titulo, el significado de una va- 
riable, etc.: 



10 REM Fulminar los invasores []NTRp] 

20 S=5:REM numero de supervivientes [TntroJ 
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El signo de comilla ' (que se obtiene de la tecla del 7 con | mays') es a su vez abreviatura 
de :REM. Por ejemplo, 



10 'Fulminar los invasores [intro 

20 S = 5 'numero de supervivientes [intro] 



GOSUB 

Si en un programa hay un grupo de instrucciones que deban ser ejecutadas varias veces, 
no es necesario escribirlas reiteradamente cada vez que el programa las necesite. Lo que se 
hace es ponerlas en una 'subrutina', la cual puede ser invocada siempre que se desee me- 
diante la instruccion GOSUB (ir a subrutina) seguida del numero de la linea donde empieza 
la subrutina. El final de la subrutina se senala con la instruccion RETURN (retorno). Cuan- 
do el programa llega a RETURN, la ejecucion salta a la instruccion siguiente al GOSUB 
que invoco la subrutina. 

(Los dos programas siguientes no hacen mas que escribir la letra de una cancion popular 
en la pantalla, y por lo tanto no es necesario que se tome la molestia de introducirlos en 
el ordenador. Los hemos incluido aquf solamente para demostrar como se pueden utilizar 
las subrutinas para realizar tareas repetidas.) 

En el siguiente programa: 

10 MODE 2 ilNTROI 

20 PRINT "Dicen que no la quieres y la regalas" [intro] 

30 PRINT "Peritas de Don Guindo y uvas tempranas" jintroI 

40 PRINT "Al tribulete" [intro! 



50 PRINT "Que no quiere bailar con usted" [i ntro] 

60 PRINT "Dejala, dejala sola" [JntroI 

70 PRINT INTRO 

80 PRINT "Es tu cara lo mismo que luna blanca" [Intro 

90 PRINT "Y tus ojos luceros que la acompafian" [i ntro] 

100 PRINT "Al tribulete" i ntro] 

110 PRINT "Que no quiere bailar con usted" [Tntro] 

120 PRINT "Dejala, dejala sola" intro 

130 PRINT riNTROl 

140 PRINT "Tengo yo comparado, nina, tu rostro" [Tntro 



150 PRINT "Con la luna de enero y el sol de agosto" intro 
180 PRINT "Al tribulete" [Intro] 



190 PRINT "Que no quiere bailar con usted" [Tntro 
200 PRINT "Dejala, dejala sola" [Tntro] 
210 PRINT [Tntro] 
run riNTROl 



Curso de introduction 1/29 



puede observar que hemos repetido varias instrucciones. Por ejemplo, la linea 40 (principio 
del estribillo) esta repetida en la 100 y en la 180. Pongamos todo el estribillo en una subruti- 
na, con RETURN al final; entonces podremos 'llamarlo' con la instruccion GOSUB 180 
cada vez que lo necesitemos. El programa queda de la siguiente forma: 

10 MODE 2 INTRO 



20 PRINT "Dicen que no la quieres y la regalas" [intro] 



30 PRINT "Peritas de Don Guindo y uvas tempranas" | intro 
40 GOSUB 180 [intro] 



80 PRINT "Es tu cara lo mismo que luna blanca" [intro | 



90 PRINT "Y tus ojos luceros que la acompanan" [intro 
100 GOSUB 180! intro I 



140 PRINT "Tengo yo comparado, nifia, tu rostro" intro] 
150 PRINT "Con la luna de enero y el sol de agosto" [Intro] 
170 END I intro I 



180 PRINT "Al tribulete" IintroI 



190 PRINT "Que no quiere bailar con usted" | intro 
200 PRINT "Dejala, dejala sola" | intro 
210 PRINT I INTRO j 



220 RETURN j INTRO 
run [INTRO I 

El ahorro de trabajo es evidente. El correcto diseno de subrutinas es una faceta esencial 
de la informatica. Con ellas se puede escribir programas 'estructurados'; son la base para 
la adquisicion de buenos habitos de programacion. 

Cuando escriba subrutinas, tenga en cuenta que no esta obligado a saltar siempre a su pri- 
mera linea. Por ejemplo, si hay una rutina en las lineas 500 a 800, podria interesar llamarla 
con GOSUB 500, con GOSUB 640 o con GOSUB 790, segun las funciones de la subrutina 
que se desee ejecutar. 

Observe que en el programa anterior hemos incluido la instruccion END en la linea 170 para 
aislar la subrutina del resto del programa. De no haberlo hecho, el programa pasaria de 
la linea 160 a la 180. 



Aritmetica sencilla 



El ordenador se puede utilizar como calculadora. 

Para aprender como hacerlo, pruebe los siguientes ejemplos. En esta seccion utilizamos el 
signo de interrogation ? como abreviatura de print. El ordenador escribe la respuesta en 
cuanto se pulsa IintroI . 
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Suma 

Escriba 

?3 + 3 I INTRO 



6 

(No se teclea el signo =). 
Escriba: 



?8 + 4 INTRO j 

12 



Resta 

(no confunda el signo menos ' — ' con el de subrayado ' '). 

Escriba: 

?4-3 j INTROJ 

1 

Escriba: 

?8-4 [INTRO] 

4 



Multiplication 

(el signo de multiplication es el asterisco *). 
Escriba: 



?3*3 INTRO 

9 



Escriba: 



?8*4 INTRO 

32 
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Division 

(el signo de dividir es la barra inclinada hacia la derecha, /). 
Escriba: 

?3/3 [Intro 
1 



Escriba: 



?8/4 Intr o; 
2 



Division entera 

(es la division en la que se ignora el resto; su signo es la barra inclinada hacia la izquierda \). 
Escriba: 

?10\6 | INTRO 
1 

Escriba: 



?20\3 In tro 
6 



Modulo 

(la operation MOD da el resto de la division entera). 
Escriba: 

?10 MOD 4 Intro] 
2 

Escriba: 

?9 MOD 3 [Intro] 
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Raiz cuadrada 

Para hallar la raiz cuadrada de un niimero se utiliza la funcion sqr( ). El niimero del que 
se va a extraer la raiz (esto es, el radicando) se pone entre los parentesis. 

Escriba: 

?sqr(16) [Intro] 
4 

(esto significa Vl6). 
Escriba: 



?sqr(100) [Intro ! 
10 



Potentiation 

(en los ordenadores el signo de 'elevar a una potencia' es la flecha hacia arriba, que en el 
AMSTRAD se obtiene de la tecla de Pt sin mays ). 

La potentiation es la operation de elevar un niimero a una potencia; es decir, multiplicarlo 
por si mismo tantas veces como indica el exponente. Por ejemplo, 3 al cuadrado (3 2 ), 3 al 
cubo (3 3 ), 3 a la cuarta (3 4 ), etc. 

Escriba: 

?3T3 [TntroI 
27 

(esto significa 3 3 ). 
Escriba: 



?8T4 Iintro] 



4096 

(esto significa 8 4 ). 

Raiz cubica 

Extraer la raiz cubica de un niimero es lo mismo que elevarlo a la potencia %• 
Asi, para hallar la raiz cubica de 27 (-y 27) escriba: 



27TCI/3) ilNTBOj 
3 
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Para hallar la rafz ciibica de 125 escriba: 

7125TI1/3) | Intro 
5 



Operaciones combinadas ( + , -, *, /) 

El ordenador entiende correctamente las operaciones combinadas, pero es necesario saber 
con que orden de prioridad las realiza. 

La primera prioridad es para la multiplicacion y la division; la segunda, para la suma y la 
resta. Este orden de prioridad es valido solamente para los calculos en los que no intervie- 
nen mas que estas operaciones. 

Si la operacion fuera: 

3 + 7-2*7/4 

se podria pensar que el ordenador la realizaria de la forma: 

3 + 7-2 *7/4 
= 8 *7 /4 
= 56/4 
= 14 

Sin embargo, el proceso de calculo es como sigue: 

3 + 7-2*7/4 
= 3 + 7-14/4 
= 3 + 7-3.5 
= 10-3.5 
= 6.5 

Compruebelo escribiendo 

73 + 7-2*7/4 flNTROl 
6.5 

Para alterar este orden se pueden incluir parentesis segiin convenga. El ordenador realiza 
las operaciones internas a los parentesis antes que las externas. Compruebelo escribiendo 
lo siguiente: 

7(3+7-21*7/4 fiNTROj 
14 
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El orden completo de prioridad de las operaciones matematicas es el siguiente: 

T Potentiation 

MOD Modulo 

- Cambio de signo 

* y / Multiplication y division 

\ Division entera 

+ y - Suma y resta 



Mas exponentes 

Cuando en los calculos van a intervenir numeros muy grandes o muy pequenos, es conve- 
niente a veces utilizar notation cienti'fica. La letra E (mayuscula o minuscula) indica que 
el numero que esta a su derecha es una potencia de 10. 

Por ejemplo, 300 es lo mismo que 3 X 10 2 . En notation cienti'fica escribiriamos 3E2. Analo- 
gamente, 0.03 es igual a 3xl0" 2 ; en notation cienti'fica, 3E-2. Pruebe los siguientes 
ejemplos. 

Puede escribir 

730*10 [INTRO I 



300 

o bien 

?3E1*1E1 flNTROl 



300 
73000*1000 Intro I ... o bien ... ?3E3*1E3 [Intro! 



73000*0.001 [Intro] . . . o bien ... ?3E3*1E-3 [TntroI 
3 
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Parte 6: Grabelo en cinta . . . 



La memoria interna del CPC464 solo puede «recordar» los datos mientras el ordenador es- 
ta encendido; en terminologia informatica, es un medio de almacenamiento «volatil». Para 
que la informacion no se pierda cuando se apague la maquina, es necesario grabar los pro- 
gramas y los datos en un medio «no volatil», tal como la cinta o el disco (mediante la uni- 
dad de disco opcinal DDI-1). 

Los programas se graban en la cinta con la orden save. Su forma mas sencilla es la 
siguiente: 

save "{nombre del programs > " [Int ro j 

El ordenador responde con el mensaje 

Press REC and PLAY then any key: 

Este mensaje ('Pulse REC y PLAY y luego cualquier tecla') indica que se debe pulsar los 
botones [REC] y [PLAY] del inagnetofono y despues una tecla cualquiera en el teclado del 
ordenador. Por 'una tecla cualquiera' se debe entender cualquier tecla menos las siguientes: 
[mays], fija m ays], [CTRL] y [esc]. 

Hecho esto, la cinta empieza a moverse. Al cabo de unos segundos aparece en la pantalla 
el siguiente mensaje: 

Saving {nombre del programs) block 1 

('Grabando . . . bloque 1'). Cuando concluye la grabacion, la cinta se detiene automatica- 
mente y aparece en la pantalla el mensaje Ready. Pulse el boton [STOP/EJECT] del mag- 
netofono para liberar la cinta. 

Nota. El ordenador no tiene forma de saber si el usuario efectivamente ha pulsado los dos 
botones en el magnetofono. Por eso, si no los pulsa, o si solo pulsa [PLAY], el pro- 
grama no quedara grabado. 

Hay otras versiones de save que permiten grabar programas de BASIC en forma protegida, 
fichero de textos ASCII y ficheros binarios. Todas ellas estan descritas en el capi'tulo 3. 



Velocidades de grabacion 



El CPC464 puede grabar y leer las cintas a dos velocidades: en la velocidad normal la trans- 
ferencia de datos se realiza a 1000 baudios; en la velocidad alta, a 2000 baudios. 
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Asi pues, en velocidad alta la grabacion y la lectura se realizan en la mitad de tiempo que 
en velocidad normal, pero se pierde el margen de seguridad que a veces es imprescindible 
cuando se trabaja con cintas de baja calidad o cuando la grabacion y la lectura se realizan 
en ordenadores distintos y alguno de ellos tiene mal alineada la cabeza lectora/grabadora. 

Si los programas se van a leer en la misma maquina que los graba, la alta velocidad es ade- 
cuada, siempre que las cintas no sean de calidad demasiado baja. 

Si no se especifica otra cosa, el ordenador graba en velocidad normal. La orden 

SPEED WRITE 1 
selecciona velocidad alta. Para volver a velocidad normal se da la orden: 

SPEED WRITE 

Cuando carga un programa, el ordenador detecta a que velocidad ha sido grabado y selec- 
ciona automaticamente la velocidad de lectura. 
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Parte 7: Introduction a los modos de 
pantalla, colores y graficos 



El AMSTRAD CPC464 puede funcionar en tres modos de pantalla: modo 0, modo 1 
y modo 2. 

Al encenderlo, el ordenador selecciona automaticamente el modo 1. 

Para apreciar las diferencias entre los tres modos, encienda el ordenador y pulse la tecla 
del 1 . Mantengala pulsada hasta que se hayan llenado dos lineas de pantalla. Si cuenta los 
unos, observara que hay 40 en cada h'nea. Esto quiere decir que en modo 1 la pantalla tiene 
40 columnas. Pulse I ntro | : el ordenador respondera con un mensaje de Syntax error, pe- 
ro no se preocupe; esta es una forma rapida de obtener nuevamente el mensaje Ready, que 
indica que el ordenador esta preparado para recibir nuestras instrucciones. 

Escriba ahora: 



mode j intro I 



Observara que ahora los caracteres son mas grandes. Pulse otra vez la tecla del 1 y no la 
suelte hasta que se hayan llenado dos lineas de la pantalla. Compruebe que ahora hay 20 
unos por linea. Esto significa que en modo la pantalla tiene 20 columnas. Pulse nueva- 
mente I intro [ y luego escriba: 

mode 2 intro j 

Observe que ahora los caracteres son muy pequenos. Puede comprobar que en modo 2 la 
pantalla tiene 80 columnas. 

Resumiendo, 

Modo -»• 20 columnas 
Modo 1 -»• 40 columnas 
Modo 2 -► 80 columnas 



Finalmente, vuelva a pulsar | intro | . 



Colores 



Este ordenador puede manejar 27 colores. En el monitor de fosforo verde (GT64) aparecen 
como distintas gradaciones de verde. Si usted adquirio el sistema con el monitor GT64, en 
cualquier momento puede comprar la unidad modulador/fuente de alimentation MP1, con 
la que podra disfrutar de los colores del ordenador conectandolo a un televisor domestico. 
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En modo se puede visualizar simultaneamente 16 de los 27 colores disponibles. 
En modo 1 se puede visualizar simultaneamente 4 de los 27 colores. 
En modo 2 se puede visualizar simultaneamente 2 de los 27 colores. 

Se puede controlar los colores del borde, del papel (fondo) y de la pluma (trazo) indepen- 
dientemente unos de otros. 

Los 27 colores disponibles son los relacionados en la tabla 1, en la que incluimos tambien 
los numeros de referencia para la instruction INK (tinta). 

Para mayor comodidad, esta tabla aparece tambien en la carcasa del ordenador, al lado 
derecho. 



Niimero 
de tinta 



Color 



Negro 

Azul 

Azul intenso 

Rojo 

Magenta 

Malva 

Rojo intenso 

Morado 

Magenta intenso 



Numero 
de tinta 



9 
10 
11 
12 

13 
14 
15 
16 

17 



Color 



Verde 

Cyan 

Azul celeste 

Amarillo 

Blanco 

Azul pastel 

Anaranjado 

Rosado 

Magenta pastel 



Numero 


j 


de tinta 


Color 


18 


Verde intenso 


19 


Verde mar 


20 


Cyan intenso 


21 


Verde lima 


22 


Verde pastel 


23 


Cyan pastel 


24 


Amarillo intenso 


25 


Amarillo pastel 


26 


Blanco intenso 



Tabla 1. Numeros de tinta y colores asociados. 

Como hemos dicho, el ordenador se pone automaticamente en modo 1 al encenderlo. Para 
volver a modo 1 estando en cualquier otro, basta con escribir: 

mode 1 iTntr oI 



La pantalla 



El borde (BORDER) es el area que rodea el papel (PAPER). (Cuando se enciende el ordena- 
dor, el borde y el papel son ambos azules.) Los caracteres que escribimos en la pantalla solo 
puede estar en la region interior al borde. El papel es el fondo sobre el que la pluma (PEN) 
escribe los caracteres. 

Vamos a explicar como se realiza la selection de los colores. 

Cuando se enciende o reinicializa el ordenador, este selecciona automaticamente el color 
numero 1 para el borde. Como puede comprobar en la tabla 1 , el color numero 1 es el azul. 
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El color del borde se puede cambiar mediante la orden BORDER seguida del niimero del 
color deseado. Por ejemplo, escriba: 

border 13 [Jntro] 

Esto es facil, pero en el interior de la pantalla las cosas son algo mas complicadas: 

Cuando se enciende o reinicializa la maquina, el niimero de papel seleccionado automatica- 
mene es el 0, y el de la pluma es el 1 . Esto no quiere decir que los colores correspondientes 
sean los que figuran en la tabla anterior con los numeros y 1 . 

Lo que ocurre es que el y el 1 son numeros de papel y de pluma, no numeros de tinta. 
Vamos a explicarnos. Supongamos que tenemos en nuestra mesa cuatro plumas, numera- 
das del al 3, y 27 tinteros, numerados del al 26. Es evidente que cuando decimos 'pluma 
niimero 1 ' no necesariamente estamos refiriendonos al color niimero 1 . La pluma niimero 
1 puede estar cargada con tinta de cualquier color; de hecho, podemos tener las cuatro plu- 
mas cargadas con la misma tinta. 

Pues bien, algo similar ocurre en el ordenador. Con la instruccion PEN (pluma) podemos 
elegir la pluma con la que vamos a escribir; la instruccion INK (tinta) nos permite 'cargar' 
esa pluma con tinta del color deseado. 

Recordando que estamos en modo 1 (40 columnas), consulte la tabla 2 y comprobara que 
la pluma niimero 1 esta cargada inicialmente con tinta de color 24. Pero el color 24 es, como 
podemos ver en la tabla 1 , amarillo intenso: el color con que se escriben los caracteres cuan- 
do acabamos de encender el ordenador. 

Las relaciones entre papel, pluma y tinta no son fijas. Los valores que se muestran en la 
tabla 2 son los seleccionados automaticamente en el momento de encender la maquina. Se 
los puede cambiar mediante la instruccion INK (tinta). Esta instruccion va seguida de dos 
numeros (parametros). El primero es el niimero de papel o de pluma que vamos a cargar; 
el segundo es el color con que vamos a cargarlo. Los parametros van separados por una 
coma. 
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Numero de 


Color de tinta 


Color de tinta 


Color de tinta 


papel/pluma 


Modo 


Modo 1 


Modo 2 





1 




1 


1 


1 


24 




24 


24 


2 


20 




20 


1 


3 


6 




6 


24 


4 


26 




1 


1 


5 







24 


24 


6 


2 




20 


1 


7 


8 




6 


24 


8 


10 




1 


1 


9 


12 




24 


24 


10 


14 




20 


1 


11 


16 




6 


24 


12 


18 




1 


1 


13 


22 




24 


24 


14 


Parpadeo 


1,24 


20 


1 


15 


Parpadeo 


16,11 


6 


24 



Tabla 2. Asignacion inicial de tintas a los papeles y las plumas. 

Puesto que estamos utilizando la pluma numero 1 , vamos a cambiar el color de tinta corres- 
pondiente: la cargaremos con tinta de color anaranjado. Escriba: 



ink 1,15 jiNTRO 

Los caracteres han cambiado instantaneamente de color. 

Tambien vamos a cambiar el color del fondo mediante la instruction INK. Sabemos que 
el numero de papel seleccionado al encender la maquina es el 0; vamos a cambiar el color 
a verde (color numero 9) escribiendo: 

ink 0,9 INT RO | 

Ahora vamos a cambiar de pluma. Escriba: 



pen 3 [Intro | 

El color de los caracteres ya escritos no ha cambiado. Esta instruction afecta solamente a 
los que escribamos a continuation. En este momento estamos utilizando la pluma numero 
3. Como puede comprobar en las tablas 1 y 2, la tinta con que esta pluma esta cargada ini- 
cialmente es la de color numero 6 (rojo intenso). Para cambiarla a rosado escriba: 

ink 3.16 [Intro] 
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Recuerde que el 3 es el color de la pluma (seleccionado con la anterior instruction pen 3) 
y que el 16 es el color de la tinta con que la cargamos (rosado). 

Cambiemos ahora de papel. Cuando lo hagamos, el anterior color de fondo no cambiara, 
porque ese color ha sido impreso con otro papel. Escriba lo siguiente: 

paper 2 [In tro] 

Consultando nuevamente las tablas 1 y 2, compruebe que el color inicialmente asignado al 
papel numero 2 es cyan intenso. Cambielo a negro escribiendo: 



ink 2,0 [Intro! 



En este momento, en la pantalla tenemos caracteres escritos por las plumas 1 y 3, sobre fon- 
dos de papel numeros y 2. Tambien se puede cambiar el color de la tinta de una pluma 
o de un papel que no esten siendo utilizados. Por ejemplo, escriba la orden: 



ink 1,2 [JNTROj 

que cambia el color de todos los caracteres que habiamos escrito antes con la pluma numero 1 . 
Escriba: 

els INTRO] 

para borrar la pantalla. 

El lector ya deberia ser capaz de hacer que el ordenador vuelva a los colores iniciales (borde 
y fondo azul y caracteres amarillos) utilizando las instrucciones BORDER, PAPER, PEN 
e INK. Intentelo. Si no lo consigue, reinicialice el ordenador con [ctrl] [mays] [esc |. 



Colores parpadeantes 



Es posible hacer que una tinta cambie intermitentemente de color. Para ello se debe afiadir 
otro numero a la instruction INK que asigna tintas a la pluma utilizada. 

Vamos a hacer que los caracteres que escribamos alternen entre los colores bianco intenso 
y rojo intenso. Reinicialice la maquina con [CTRL] [mays] [esc] y escriba lo siguiente: 

ink 1,26,6 [Intro] 

En este caso el 1 es el numero de la pluma, el 26 es el del color bianco intenso y el 6 es 
el del segundo color, rojo intenso. 

El mismo efecto de parpadeo se puede dar a los colores del fondo, para lo cual se afiade 
un segundo numero de color a la instruction INK que asigna tintas al papel actual. Para 
hacer que el color del fondo alterne entre verde y amarillo intenso escriba: 

ink 0,9,24 [Tntro] 
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En este caso es el numero del papel, 9 es el numero del color verde y 24 es el numero del 
segundo color, el amarillo intense 



Reinicialice el ordenador con jctlr| 1 mays | ESC| . 

Observe en la tabla 2 que en modo hay dos numeros de pluma y dos numeros de papel, 
el 14 y el 15, que tienen asignadas tintas parpadeantes. Es decir, sus correspondientes tintas 
estan preprogramadas con un color adicional. 

Escriba lo siguiente: 



mode I intro I 



pen 15 I intro | 

y vera en la pantalla la palabra Ready parpadeando entre azul celeste y rosado. Escriba 
ahora: 

paper 14 [intro! 
els 

El texto continua parpadeando como antes, pero ademas el fondo ha empezado a alternar 
entre los colores amarillo y azul. 

Los numeros de pluma y de papel 14 y 15 pueden ser reprogramados, mediante la adecuada 
instruccion INK, para que parpadeen con otras tintas o bien para asignarles un color fijo. 

Finalmente, se puede hacer parpadear el borde sin mas que especificar un segundo numero 
de color en la instruccion BORDER. Escriba: 

border 6,9 jintro! 

El borde esta parpadeando entre los colores rojo intenso y verde. Observe que al borde se 
le puede asignar uno o dos colores cualesquiera de los 27 disponibles, independientemente 
del modo en que este la pantalla (0, 1 o 2). 



Reinicialice el ordenador con |ctrl| j mays Iescj . 

lntroduzca y ejecute el siguiente programa, que demuestra los colores disponibles. 

10 MODE [Intro] 



20 velocidad=600: REM establece velocidad del programa intro | 
30 FOR b=0 TO 26 [intro] 



40 LOCATE 1,12 INTRO 



50 BORDER b ilNTROl 



60 PRINT "color del borde:";b I intro I 



70 FOR t=1 TO velocidad I intro I 



80 NEXT t,b I INTRO | 
90 CLG | INTRO! 



100 FOR p=0 TO 15 | intro j 
110 PAPER p IlNTROl 
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120 PRINT "papel: ";p [intro] 
130 FOR n = TO 15 [intro] 



140 PEN n fiNTRol 



150 PRINT "pluma:";n [Intro] 
160 NEXT n I INTRO 



170 FOR t=1 TO velocidad*2 intro | 
180 NEXT t,p [intro] 
190 MODE 1 [Intro] 



200 BORDER 1 [Intro] 
210 PAPER [Intro] 
220 PEN 1 rfNTROl 
230 INK 0,1 [TntroI 



240 INK 1,24 I IN TRO | 
run [Intro] 



OBSERVACION MUY IMPORTANTE 

En este programa, asi como en otros capitulos y listados de este manual, las palabras 
clave de BASIC aparecen en mayiisculas, pues el ordenador convierte automaticamente 
miniisculas a mayiisculas cuando se le pide que haga un listado del programa (con 
LIST). En general, es preferible escribir las instrucciones en miniisculas; esto ayudara 
mas tarde a detectar errores, ya que las palabras clave de BASIC que contengan algiin 
error no seran convertidas a mayiisculas. 

En lo que resta de este 'Curso de introduction' daremos los listados indistintamente 
en mayiisculas y miniisculas, para que usted se familiarice con esta caracteristica de 
BASIC. 

Los nombres de las variables, tales como x o a$, no son convertidos a mayiisculas al 
listar el programa. Sin embargo, el ordenador reconoce las variables tanto si estan en 
mayiisculas como si estan en miniisculas; de hecho, para el ordenador x es la misma 
variable que X. 



Atencion 



A partir de ahora no vamos a seguir recordandole que debe pulsar [Intro al terminar 
de escribir cada linea de programa y cada orden directa, pues suponemos que usted ya 
esta suficientemente habituado a hacerlo. 
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Graficos 



En la memoria del ordenador esta pregrabado el diseno de cierto numero de caracteres. Pa- 
ra escribirlos en la pantalla necesitamos la palabra clave: 

chr$( ) 

Dentro de los parentesis se pone el numero del caracter, que debe estar en el margen de 32 
a 255. 

Reinlcialice el ordenador con [CTRL] may s] [esc] y escriba lo siguiente: 
print chr${250) 

No olvide pulsar [ Intro] . En la pantalla ha aparecido el caracter numero 250, que es la fi- 
gura de un hombre caminando hacia la derecha. 

Para ver todos los caracteres y si'mbolos, junto con su numero correspondiente, introduzca 
y ejecute el siguiente programa (recuerde que debe pulsar [I ntro] al final de cada li'nea): 

10 for n=32 to 255 
20 print n;chr$(n); 
30 next n 
run 

Todos estos caracteres y mimeros figuran en el capftulo 'Para su referencia . . .'. 



LOCATE 

Esta instruccion sirve para colocar el cursor en un lugar especificado de la pantalla. A me- 
nos que se lo mueva con una instruccion LOCATE, el punto de partida del cursor es el extre- 
mo superior izquierdo de la pantalla, punto de coordenadas 1,1 (en el sistema de coordena- 
das x, y, donde x es la position horizontal e y es la vertical). En modo 1 hay 40 columnas 
y 25 filas (o lineas). Asi, para colocar el cursor en el centro de la primera linea, tendremos 
que utilizar 20,1 como coordenadas x, y. 

Teclee lo siguiente (sin olvidar pulsar [intro I al final de cada linea): 

mode 1 . . . borra la pantalla y lleva el cursor al extremo superior izquierdo 

10 locate 20,1 
20 print chr$(250) 
run 
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Para comprobar que el caracter esta en la primera h'nea, cambiemos el color del borde: 

border 

El borde es ahora negro y podemos ver que el hombrecillo esta en el centro de la h'nea 
superior. 

En modo solo hay 20 columnas, pero las mismas 25 h'neas. Si ahora escribe: 

mode 
run 

vera que el hombre se ha ido al extremo superior derecho de la pantalla. Esto ha ocurrido 
porque la coordenada x = 20 es la ultima columna en modo 0. Escriba: 

mode 2 
run 

Vuelva a modo 1 con: 

mode 1 

Ahora pruebe usted con diferentes posiciones en locate y diferentes niimeros en chr$( ). 
Por ejemplo, escriba: 

locate 20,12:print chr$(240) 

y vera una flecha en el centro de la pantalla. Observe que en esta instruction: 

20 es la coordenada x (horizontal) (margen: 1 a 40) 
12 es la coordenada y (vertical) (margen: 1 a 25) 
240 es el niimero del caracter (margen: 32 a 255) 

Para mover el caracter 250 de izquierda a derecha de la pantalla, escriba lo siguiente: 

10CLS 

20 FOR x=1 TO 39 

30 LOCATE x,20 

50 PRINT CHR$(250) 

60 NEXT x 

70 GOTO 10 

run 

Pulse esc dos veces para abandonar el programa. 

Si queremos borrar el caracter recien escrito antes de escribir el siguiente, debemos hacer 

50 print " ";chr$(250) 
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(Esta nueva linea 50 reemplaza automaticamente la que teniamos antes.) Escriba: 

run 

Para mejorar la ilusion de movimiento del caracter por la pantalla, anada al programa ante- 
rior la siguiente linea: 

40 call &bd19 

Este programa se puede mejorar introduciendo pausas y utilizando un simbolo distinto pa- 
ra el retroceso. 

Escriba: 
list 

y anada las siguientes lineas: 

70 FOR n = 1 TO 300:NEXT n 

80 FOR x=39 TO 1 STEP -1 

90 LOCATE x,20 

100 FRAME 

110 PRINT CHR${251);" " 

120 NEXT x 

130 FOR n = 1 TO 300:NEXT n 

140 GOTO 20 

run 



PLOT 

La instruction PLOT es analoga a LOCATE, pero controla la position del cursor grafico 
y utiliza un sistema de coordenadas distinto, en el que las distancias se miden en pixels (un 
pixel, o punto grafico, es la minima area de la pantalla controlable individualmente). 

El cursor grafico es invisible, y distinto en todos los aspectos del cursor de texto. 

La pantalla se divide en 640 puntos en horizontal por 400 en vertical. Las coordenadas x, y 
se toman con respecto al extremo inferior izquierdo de la pantalla, que es el punto de coor- 
denadas 0,0. A diferencia de lo que ocurria con LOCATE, las coordenadas de este sistema 
no dependen del modo de pantalla (0, 1 o 2). 

Para comprobarlo, reinicialice la maquina con Ctrl [mays] [esc] y escriba: 

plot 320,200 
Observe el punto que ha aparecido en el centro de la pantalla. 
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Hagamos lo mismo en modo 0: 

mode 
plot 320.200 

El punto sigue estando en el centro de la pantalla, pero es mas grande. Para ver el efecto 
en modo 2 escriba: 

mode 2 
plot 320,200 

Como era de esperar, el punto sigue centrado, pero es mucho mas pequeno. 

Dibuje unos cuantos puntos en diversos lugares de la pantalla y en modos distintos para 
familiarizarse con esta instruction. Cuando haya terminado, escriba: 

mode 1 

para volver a modo 1 y borrar la pantalla. 



DRAW 

Reinicialice la maquina con [CTRL'] [mays] [esc]. La instruction DRAW dibuja una recta a 
partir de la position actual del cursor grafico. Para verla en action, dibuje un rectangulo 
con el siguiente programa: 

5 els 

10 plot 10.10 
20 draw 10.390 
30 draw 630.390 
40 draw 630.10 
50 draw 10,10 
60 goto 60 
run 

En la linea 10 la instruction PLOT coloca el cursor en el punto de partida deseado. A conti- 
nuation, las instrucciones DRAW van dibujando segmentos de recta: hacia arriba, hacia 
la derecha, etc. 

Pulse | esc] dos veces para abandonar el programa. 

(Observe la linea 60 de este programa. Esta linea establece un bucle infinito, del que solo 
se sale deteniendo el programa. Una instruction de este tipo es util cuando se quiere evitar 
que el ordenador exhiba el mensaje Ready al terminar el programa.) 
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Anada al programa las siguientes lineas, las cuales dibujan un segundo rectangulo dentro 
del anterior: 

60 plot 20,20 
70 draw 20,380 
80 draw 620,380 
90 draw 620,20 
100 draw 20,20 
110 goto 110 
run 

Pulse [esc] dos veces para detener el programa. 



MOVE 

Esta instruction funciona igual que PLOT en cuanto a llevar el cursor grafico a la position 
especificada, pero no dibuja el punto. 

Escriba: 

els 

move 639,399 

Aunque no podamos verlo, hemos llevado el cursor al extremo superior derecho de la 
pantalla. 

Para demostrarlo, vamos a dibujar una recta desde ese punto hasta el centro de la pantalla. 
Escriba: 

draw 320,200 



Circunferencias 



Las circunferencias se pueden dibujar punto a punto o con trazo continuo. Una forma de 
dibujar una circunferencia consiste en dibujar puntos en las posiciones correctas. En la fi- 
gura siguiente se ilustra como se calculan las coordenadas x, y de un punto p de la circunfe- 
rencia. Las formulas son: 

x=190*cos(a) 
y=190*sin(a) 
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Dibujo de una circunferencia 

En los programas anteriores hemos referido todos los dibujos al extremo inferior izquierdo 
de la pantalla. Si queremos que nuestra circunferencia quede centrada en la pantalla, debe- 
mos situar su centro en el punto de coordenadas 320,200, y luego sumar a estos valores los 
dados por las formulas anteriores. 

El siguiente programa dibuja punto a punto una circunferencia: 

new 

10 CLS 

20 DEG 

30 FOR a = 1 TO 360 

40 MOVE 320.200 

50 PLOT320+190*COS(a),200+190*SIN(a) 

60 NEXT 

run 

Observe que hemos dado la orden NEW antes de introducir el programa. Esta orden hace 
que el ordenador borre el programa que en ese momento tenga en la memoria (de forma 
similar a lo que ocurre cuando se pulsa [ctrl mays [esc]). Sin embargo, la pantalla no 
se borra. 

El radio de la circunferencia se puede reducir poniendo en lugar de 190 un niimero menor 
de pixels. 

Para ver el efecto de dibujar la circunferencia de otra forma (en radianes), borre la linea 
20 escribiendo: 

20 
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En lugar de punto a punto, podemos dibujar la circunferencia con trazo continue Modifi- 
que la linea 50 para poner draw en lugar de plot. La linea sera entonces: 

50 draw 320 + 190*cos(a),200+190*sin(a) 

Pruebe esta modification con la linea 20 y sin ella. 

Observe que en la linea 60 de este programa hemos puesto NEXT en lugar de NEXT a. En 
efecto, se puede omitir el nombre de la variable, pues el ordenador se encarga de averiguar 
a que FOR corresponde cada NEXT. No obstante, en los programas en los que haya mu- 
chos bucles FOR ... NEXT, puede ser conveniente poner los nombres de las variables des- 
pues de NEXT para que el programa sea mas inteligible cuando se lo este corrigiendo o 
estudiando. 



ORIGIN 

En el programa anterior utilizabamos la instruccion MOVE para establecer el centro de la 
circunferencia y luego sumabamos a las coordenadas del centro las coordenadas de los pun- 
tos de la circunferencia. Podemos evitar esas sumas si redefinimos la position del origen 
de coordenadas con la instruccion ORIGIN. El ordenador entendera las coordenadas que 
se le suministren a continuation como referidas al nuevo origen. Escriba lo siguiente: 

new 

10 els 

20 for a = 1 to 360 

30 origin 320,200 

40 plot 190*cos(a),190*sin(a) 

50 next 

run 

El siguiente programa dibuja cuatro circunferencias mas pequenas: 

new 

10 CLS 

20 FOR a = 1 TO 360 

30 ORIGIN 196,282 

40 PLOT 50*COS(a).50*SIN(a) 

50 ORIGIN 442,282 

60 PLOT 50*COS(a),50*SIN(a) 

70 ORIGIN 196,116 

80 PLOT 50*COS(a),50*SIN(a) 

90 ORIGIN 442,116 

100 PLOT 50*COS(a),50*SIN(a) 

110 NEXT 

run 
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Otra forma de dibujar la circunferencia (con trazo continuo) es la siguiente: 

new 

10 MODE 1 

20 ORIGIN 320,200 

30 DEG 

40 MOVE 0,190 

50 FOR a=0 TO 360 STEP 10 

60 DRAW 190*SIN(a),190*COS(a) 

70 NEXT 

run 

En este caso se van dibujando pequenos segmentos de recta, de un punto al siguiente de 
la circunferencia. Este metodo es mucho mas rapido que el de dibujo punto a punto. 

Observe una vez mas el efecto de la instruction DEG: suprima la linea 30 y ejecute el 
programa. 



Un ejemplo . . . 



Para concluir esta section, le ofrecemos un programa de demostracion de graficos que in- 
corpora muchas instrucciones que el lector ya deberia entender. 

10 MODE 1:BORDER 0:DEG 

20 PRINT "Por favor, espere" 

30 FOR n = 1 to 3 

40 INK 0,0:INK 1,26:INK 2,6:INK 3,18 

50 IF n = 1 THEN sa = 120 

60 IF n=2THEN sa = 135 

70 IF n=3THEN sa = 150 

80 IF n = 1 THEN ORIGIN 0,-50,0,640,0,400 ELSE ORIGIN 0,0,0,640,0,400 

90 DIM cx(5),cy(5),r(5),lc(5) 

100 DIM np(5) 

110 DIM px%(5,81),py%(5,81) 

120st=1:cx(1)=320:cy(1)=200:r(1)=80 

130 FOR st=1 TO 4 

140 r(st+1) = r(st)/2 

150 NEXT st 

160 FOR st=1 TO 5 

170 lc(st)=0:np{st) = 

180 np(st) = np(st) + 1 

190 px%{st,np{st)) = r{st)*SIN{lc(stl) 

200 py%{st,np{st)) = r{st)*COS{lc{st» 
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210 lc(st) = lc(st)+360/r(st) 

220 IF lc(st)<360 THEN 180 

230 px%(st,np(st) + 1) = px%(st,1) 

240 py%(st,np(st) + 1) = py%(st,1) 

250 NEXT st 

260 CLS:cj=REMAIN(1):cj = REMAIN(2) 

270 cj = REMAIN(3):INK 1,2:st=1 

280 GOSUB 350 

290 LOCATE 1,1 

300 EVERY 25,1 GOSUB 510 

310 EVERY 15,2 GOSUB 550 

320 EVERY 5,3 GOSUB 590 

330 ERASE cx,cy,r,lc,np,px%,py%:NEXT 

340 GOTO 340 

350 cx% = cx(st):cy% = cy(st):lc(st)=0 

360 FOR x% = 1 TO np(st) 

370 MOVE cx%,cy% 

380 DRAW cx% + px%(st,x%),cy% + py%(st,x%),1+(st MOD 3) 

390 DRAW cx% + px%(st,x% + 1),cy% + py%(st,x% + 1),1+(st MOD 3) 

400 NEXT x% 

410 IF st=5 THEN RETURN 

420 lc(st)=0 

430 cx(st + 1) = cx(st) + 1.5*r(st)*SIN(sa + lc(st)) 

440 cy(st + 1) = cy(st) + 1.5*r(st)*COS(sa + lc(st)) 

450 st = st+1 

460 GOSUB 350 

470 st = st-1 

480 lc(st) = lc(st)+2*sa 

490 IF (lc(st) MOD 360)<>0 THEN 430 

500 RETURN 

510 ik(1) = 1 + RND*25 

520 IF ik(1) = ik(2) OR ik(1) = ik(3) THEN 510 

430 INK 1,ik(1) 

540 RETURN 

550 ik(2) = 1 + RND*25 

560 IF ik(2) = ik(1) OR ik(2) = ik(3) THEN 550 

570 INK 2,ik(2) 

580 RETURN 

590 ik(3) = 1 + RND*25 

600 IF ik(3) = ik(1) OR ik(3) = ik(2) THEN 590 

610 INK3,ik(3) 

620 RETURN 
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Parte 8: Sonidos 



El ordenador emite su sonido a traves del altavoz que tiene incorporado. Si esta utilizando 
la unidad modulador/fuente de alimentation MP1 y un televisor domestico, baje el mando 
de volumen del televisor al minimo. 

El nivel de sonido se ajusta con el mando VOLUMEN que hay en el panel derecho del orde- 
nador. Tambien es posible enviar el sonido a un amplificador externo, por medio de la sali- 
da marcada con E/S en el ordenador. De esta forma se puede oir el sonido en estereofonia, 
utilizando los altavoces o los auriculares de un equipo de alta fidelidad. En la parte 2 de 
este 'Curso de introduction' se explica como tomar las senales de la salida E/S del 
ordenador. 



La instruction SOUND 



La instruction SOUND tiene siete parametros. Los dos primeros son imprescindibles, 
mientras que los restantes son opcionales. La forma de la instruction es la siguiente: 

SOUND (situation de canales) .(periodo de tono) .(duration) , (volumen) , 
(envolvente de volumen) .(envolvente de tono) .(periodo de ruido) 

Parece complicada a primera vista, pero veremos que en realidad no lo es tanto cuando ha- 
yamos analizado el significado de todos los parametros. Asi pues, estudiemos los parame- 
tros uno por uno. 



Situation de los canales 

Para no complicar las cosas, por ahora nos limitaremos a considerar este parametro como 
simple selector de canales. Hay tres canales de sonido; de momento solo utilizaremos el nu- 
mero 1. 



Periodo de tono 

El periodo de tono es la forma tecnica de especificar el tono del sonido; en otras palabras, 
de identificar la nota (DO, RE, MI, FA, etc.). Cada nota tiene un numero de identification, 
que es el periodo de tono. Si consulta el capitulo 'Para su referencia . . . ', comprobara que 
la nota DO media tiene un periodo de tono de 478. 
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Reinicialice el ordenador con [CTRL] [mays] [esc] y luego escriba: 

10 sound 1,478 
run 

Acaba de oir la nota DO media, que ha sonado durante 0.2 segundos. 

<,No ha oido nada? Suba el control de volumen del ordenador y vuelva a ejecutar el 
programa. 

Duracion 

Este parametro especifica la duracion del sonido. Las unidades son de centesimas de segun- 
do (0.01 s). Si no se especifica duracion, el ordenador toma el valor implicito para este para- 
metro, que es 20; por eso la nota que acaba de oir ha durado 0.01x20 = 0.2 segundos. 

Si queremos que la nota dure 1 segundo, el valor del parametro tendra que ser 100; para 
dos segundos, 200; etc. Escriba lo siguiente: 

10 sound 1,478,200 
run 

Acaba de oir la nota DO media con duracion de 2 segundos. 

Volumen 

Este parametro especifica el volumen de la nota. El margen de valores va de a 15. El 'volu- 
men' es el minimo; el 15 es el maximo. Si no se especifica ningun valor, el ordenador toma 
el implicito, que es 12. Escriba lo siguiente: 

10 sound 1,478,200,5 
run 

Fijese en el volumen de este sonido y comparelo con el siguiente: 



10 sound 1,478,200,15 
run 



Como puede observar, es mucho mas intenso que el anterior. 



Envolvente de volumen 

Se puede hacer que el volumen de una nota no sea constante, sino que varie con el tiempo 
mientras la nota esta sonando. Para especificar la forma de variation del volumen en fun- 
cion del tiempo necesitamos otra instruction: EIMV. De hecho, podemos definir varias en- 
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volventes de volumen distintas, cada una de las cuales tendra su numero de referenda. Asi, 
si nemos definido la envolvente de volumen numero 1 , podemos utilizarla poniendo en la 
instruccion SOUND el numero 1 como parametro de envolvente de volumen. En seguida 
explicaremos como se definen las envolventes de volumen. 



Envolvente de tono 

Se puede hacer que el tono de una nota no sea constante, sino que varie con el tiempo mien- 
tras la nota esta sonando. Para especificar la forma de variacion del tono en funcion del 
tiempo necesitamos otra instruccion: ENT. De hecho, podemos definir varias envolventes 
de tono distintas, cada una de las cuales tendra su numero de referenda. Asi, si hemos defi- 
nido la envolvente de tono numero 1, podemos utilizarla poniendo en la instruccion 
SOUND el numero 1 como parametro de envolvente de tono. En seguida explicaremos co- 
mo se definen las envolventes de tono. 



Ruido 

El periodo de ruido es el ultimo parametro de la instruccion SOUND. Las caracteristicas 
del ruido se pueden variar eligiendo para este parametro un valor comprendido entre 1 y 
31. Ponga el valor 2 en la instruccion SOUND y escuche el efecto. Ponga luego el numero 
27 y observe la diferencia. Escriba: 

10 sound 1,478,200,1 5, „2 

En esta instruccion hemos dejado en bianco dos parametros (,,,) porque aun no hemos crea- 
do ninguna envolvente de volumen ni de tono. 



Definition de una envolvente de volumen 



La instruccion que define envolventes de volumen es ENV. En su version mas sencilla, esta 
instruccion lleva 4 parametros. Su forma es la siguiente: 

ENV {numero de envolvente) , {numero de escalones) .{altura de cada escalon), 
{duracion de cada escalon) 

Estudiemos los parametros uno por uno. 



Numero de la envolvente 

Es el numero de referenda (entre y 15) por el que la citaremos en la instruccion SOUND. 
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Numero de escalones 

Este parametro especifica en cuantas etapas queremos que la nota evolucione antes de ter- 
minal 1 . Por ejemplo, si la nota ha de durar 10 segundos, podemos dividirla en 10 etapas 
de 1 segundo cada una; en tal caso, el parametro 'numero de escalones' tendrfa el valor 10. 

El margen de este parametro es de a 127. 



Altura de cada escalon 

En cada etapa, el volumen puede variar con respecto al nivel anterior en un numero de uni- 
dades comprendido en y 15. Estos 16 niveles de sonido son los mismos que se definen 
en la instruction SOUND. Sin embargo, el margen del parametro 'altura de escalon' es de 
-128 a +127; el nivel del volumen vuelve a cada vez que sobrepasa el 15. 



Duration de cada escalon 

Este parametro especifica la duration de cada escalon en unidades de centesimas de segun- 
do. El margen de valores es de a 255; esto significa que la duration maxima de cada esca- 
lon es de 2.56 segundos (el se considera como 256). 

Por consiguiente, el producto del parametro 'numero de escalones' por el parametro 'dura- 
tion de cada escalon' no deberia ser mayor que el parametro 'duration' especificado en la 
instruction SOUND. De lo contrario, el sonido terminara antes de que se hayan completa- 
do todos los escalones de la envolvente. (En ese caso el ordenador ignora el resto del conte- 
nido de la envolvente.) 

Analogamente, si la duration especificada en SOUND es mayor que la impuesta por el pro- 
ducto de 'numero de escalones' por 'duration de cada escalon', la nota continuara sonando 
aunque se hayan terminado los escalones de la envolvente de volumen, y lo hara al nivel 
del ultimo escalon de la envolvente. 

Para practicar con las envolventes de volumen, pruebe el siguiente programa: 

10 env 1,10,1,100 

20 sound 1,284,1000,1,1 

run 

La linea 20 especifica un sonido con numero de tono igual a 284 (LA international), dura- 
tion de 10 segundos, volumen inicial igual a 1 y envolvente de tono numero 1, la cual con- 
siste en 10 escalones de altura 1 y duration 1 segundo (100x0.01). 

Pruebe las siguientes formas de la linea 10 y trate de escuchar el efecto de las diferentes 
envolventes de volumen: 

10 env 1,100,1,10 
10 env 1,100,2,10 
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10 env 1,100,4,10 
10 env 1,50,20,20 
10 env 1,50,2,20 
10 env 1,50,15,30 

Finalmente, pruebe la siguiente: 

10 env 1,50,2,10 

Observe que el volumen permanece constante durante la segunda mitad de la nota. Esto 
ocurre por que el numero de escalones es 50 y la duration de cada uno de ellos es 
0.1 s, con lo que la duration total de la envolvente es de solamente 5 segundos, mientras 
que en la instruction SOUND se especifica una duration de 10 segundos. 

Haga usted otras pruebas y trate de generar sonidos diferentes. 

Si quiere crear envolventes mas complejas, puede repetir los tres ultimos parametros de la 
instruction ENV para definir otras 'secciones' de la envolvente (hasta un maximo de 4 
secciones). 



Definition de una envolvente de tono 



La instruction que define envolventes de tono es ENT. En su version mas sencilla, esta ins- 
truction lleva 4 parametros. Su forma es la siguiente: 

ENT {numero de envolvente) , {numero de escalones), {altura de cada escalon) , 
{duracion de cada escalon) 

Como siempre, estudiemos los parametros uno por uno. 



Numero de la envolvente 

Es el numero de referencia (entre y 15) por el que la citaremos en la instruction SOUND. 

Numero de escalones 

Este parametro especifica en cuantas etapas queremos que la nota evolucione antes de ter- 
minar. Por ejemplo, si la nota ha de durar 10 segundos, podemos dividirla en 10 etapas 
de 1 segundo cada una; en tal caso, el parametro 'numero de escalones' tendria el valor 10. 

El margen de este parametro es de a 239. 
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Periodo de tono de cada escalon 

En cada etapa, el tono puede variar con respecto al de la anterior en un numero de unidades 
comprend.do entre -128 y +127. Las variaciones negativas representan aumento del tono 
(tono mas agudo); las variaciones positivas reducen el tono (tono mas grave). El valor mini- 
mo del periodo de tono es 0. Tengalo en cuenta cuando programe envolventes de tono En 
el capitulo 'Para su referencia . . . ' se da la lista completa de los periodos de tono. 

Duracion de cada escalon 

Este parametro especifica la duracion de cada escalon en unidades de centesimas de segun- 
do. El margen de valores es de a 255; esto significa que la duracion maxima de cada esca- 
lon es de 2.56 segundos (el se considera como 256). 

Por consiguiente, el producto del parametro 'numero de escalones' por el parametro 'dura- 
cion de cada escalon' no deberia ser mayor que el parametro 'duracion' especificado en la 
instruccion SOUND. De lo contrario, el sonido terminara antes de que se hayan completa- 
do todos los escalones de la envolvente. (En ese caso el ordenador ignora el resto del conte- 
nido de la envolvente.) 

Analogamente, si la duracion especificada en SOUND es mayor que la impuesta por el pro- 
ducto de 'numero de escalones' por 'duracion de cada escalon', la nota continuara sonando 
aunque se hayan terminado los escalones de la envolvente de tono, y lo hara con el tono 
correspondiente al de la ultima etapa de la envolvente. 

Para practicar con las envolventes de tono, pruebe el siguiente programa: 

10 ent 1,100,2,2 

20 sound 1, 284,200, 15„1 

run 

La linea 20 especifica un sonido con numero de tono igual a 284 (LA internacional) dura- 
cion de 2 segundos, volumen inicial igual a 15 (el maximo), sin envolvente de volumen (pa- 
rametro en bianco ,,) y con envolvente de tono numero 1. 

En la linea 10 se define la envolvente de tono, la cual consiste en 100 escalones de altura 
2 (reduccion del tono) y duracion 0.02 segundos (2x0.01). 

Pruebe las siguientes formas de la linea 10 y trate de escuchar el efecto de las diferentes 
envolventes de tono: 

10 ent 1,100,-2,2 
10 ent 1,10,4,20 
10 ent 1,10,-4,20 
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Cambie ahora la instruccion sound y la envolvente de tono escribiendo: 

10 ent 1,2,17,70 

20 sound 1,142,140,15„1 

30 goto 10 

run 

Pulse [esc] dos veces para detener el programa. 

Se puede combinar las instrucciones ENV, ENT y SOUND para crear sonidos mas comple- 
jos. Empiece con el siguiente programa: 

10 env 1,100,1,3 

20 ent 1,100,5,3 

30 sound 1,284,300,1,1,1 

run 

Cambie la linea 20 por la siguiente: 

20 ent 1,100,-2,3 
run 

Y finalmente pruebe el siguiente programa: 

10 env 1,100,2,2 

20 ent 1,100,-2,2 

30 sound 1,284,200,1,1,1 

run 

Si quiere crear envolventes mas complejas, puede repetir los tres ultimos parametros de la 
instruccion ENT para definir otras 'secciones' de la envolvente (hasta un maximo de 4 
secciones). 

Haga usted mismo otras pruebas. Por ejemplo, incluya ruido en la instruccion SOUND y 
afiada mas secciones a las envolventes de volumen y de tono. 

En el capitulo 'Lista completa de las palabras clave del BASIC de AMSTRAD' explicare- 
mos con todo detalle las diversas instrucciones de sonido. Si le interesan los aspectos mas 
melodicos del sonido, consulte la section 'El sonido de la musica' del capitulo titulado 
'Cuando usted guste . . .'. 
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Capitulo 2 

La genesis de un programa 



Pues bien. Usted ya ha leido el 'Curso de introduction' y tiene ante si el ordenador encendi- 
do. Ya sabe como hacer que el ordenador repita una tarea varias veces con la instruction 
FOR ... NEXT y como hacerle realizar operaciones de forma condicional con la instruc- 
cion IF . . . THEN .... 

Pero pronto empezara a cansarse de ver su nombre repetido hasta la saciedad en la pantalla 
y querra aprender algo de informatica mas seria, algo litil o divertido. En el capitulo si- 
guiente damos la lista de todas las palabras clave del BASIC de AMSTRAD, junto con su 
sintaxis, es decir, la forma de utilizarlas. Con estas herramientas en la mano, el unico limite 
a lo que puede obtener del ordenador lo fijara su imagination. 

Si no ha utilizado antes ningiin otro ordenador, es probable que la palabra 'programacion' 
le suene amenazadora. jNo le tenga miedo! Programar es mas facil de lo que usted cree, 
y desde luego mucho mas facil de lo que la jerga tecnica da a entender. 

No se deje asustar por BASIC y vera que pronto empieza a disfrutar de la programacion 
y de los frutos de su esfuerzo. Programar puede llegar a ser un ejercicio muy gratificante, 
en particular para el principiante que se pone a experimentar con la maquina y el lenguaje. 
Recuerde siempre que, a exception del riesgo de borrar accidentalmente una cinta, nada 
que usted haga en el teclado puede dafiar el ordenador; siempre vale la pena intentar algo 
nuevo. 



^Por donde empezamos? 



En programacion, como en muchas otras actividades, lo mas diffcil es empezar. Sin embar- 
go, lo peor que puede hacer es lanzarse directamente al teclado sin antes pensar para que. 

El primer paso en el desarrollo de un programa debe ser establecer claramente que se pre- 
tende que el programa haga y como se quiere que presente los resultados en la pantalla. 

Decidido esto, se puede empezar a escribir un programa que realice las funciones deseadas, 
preocupandose siempre de que el programa discurra suavemente de principio a fin, con el 
minimo numero de saltos posible. Un buen programa debe ser facil de leer una vez listado, 
no un lio indescifrable que haga imposible la detection de errores o la depuration del 
programa. 

Afortunadamente, BASIC es un lenguaje muy tolerante que facilita la depuration de los 
programas emitiendo mensajes que indican donde esta el error y en que consiste. Ademas, 
hace posible la ampliation de los programas, pues permite intercalar lineas nuevas entre las 
ya existentes. 
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Un programa sencillo 



Manos a la obra. Vamos a escribir un programa que controle y mantenga un fichero con 
los nombres y numeros de telefono de nuestros amigos. Le llamaremos 'guia de telefonos'. 
Para respetar las reglas que hemos enunciado, 'i,que debe hacer el programa?'; '<,como de- 
be presentar los resultados en la pantalla?' 

El programa debe permitirnos almacenar 100 nombres y numeros de telefono. Cuando que- 
ramos averiguar un numero de telefono, escribiremos el nombre y el ordenador nos dara 
el numero. Ademas, por si no recordamos como habfamos escrito algiin nombre, el progra- 
ma debe ser capaz de mostrar toda la information en la pantalla. Dicho sea de paso, esto 
ya nos hace empezar a pensar en la forma de presentation de los resultados en la pantalla. 

De acuerdo, vamos al teclado. Empezaremos por escribir el nombre del programa: 
10 REM guia de telefonos 

No es imprescidible dar nombre a todos los programas, pero comprobara cuando tenga gra- 
bados unos cuantos que es muy util poder averiguar de un golpe de vista cual es cual. 

Lo siguiente que necesitamos es poder captar por el teclado (con INPUT) una cadena de 
caracteres (quiza un nombre) para luego poder asignarlo a una variable. A la variable que 
represente el nombre le llamaremos NOMBRE$. Lo mismo se puede hacer con el numero 
de telefono; a la variable le llamaremos TEL$. 

i,Recuerda todavia los programas del 'Curso de Introduction'? En algunos de ellos utiliza- 
bamos la instruction INPUT para captar los valores de las variables. Escribamos: 

20 INPUT "Escriba el nombre: ";NOMBRE$ 

30 INPUT "Escriba el numero de telefono:";TEL$ 

run 

En respuesta al programa podemos introducir un nombre (por ejemplo, Juan) y luego un 
numero de telefono (por ejemplo, 923 233717). 

El programa ha almacenado la information que le hemos sumistrado, pero no ha escrito 
ningiin resultado en la pantalla. Asi pues, en algiin lugar del programa necesitaremos ins- 
tructions del tipo 

PRINT NOMBRE$ ... y ... PRINT TEL$ 

con las que recuperemos los valores de las variables. 

Algo falla, iverdad? Dijimos que nuestro programa deberia ser capaz de almacenar 100 
nombres con sus numeros de telefono; si seguimos por este camino, necesitaremos 200 ins- 
trucciones INPUT para escribrir la lista en la pantalla. No se inquiete; los ordenadores tie- 
nen un recurso que permite manejar con facilidad grandes cantidades de datos: se trata de 
las 'listas'. Una lista es una variable que puede representar, con un solo nombre (tal co- 
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mo NOMBRE$), un grupo de datos (en nuestro caso necesitamos 100) que se identifican 
por un indice. Cuando queramos referirnos a un dato concrete lo citaremos por el nombre 
de la variable seguido del indice entre parentesis; por ejemplo, NOMBRE$(27), donde 27 
es el indice y NOMBRES$ es lo que denominamos variable indexada. Si como indice po- 
nemos una variable numerica, NOMBRE$(x), en lugar de un niimero concrete podemos 
manejar la lista completa de datos, del 1 al 100, variando el valor de x dentro de un bucle 
FOR . . . NEXT (v. g., FOR x=1 TO 100). A medida que se va incrementando el valor de 
x, el indice de NOMBRE$ va senalando los diferentes elementos de la lista. 

En nuestro programa necesitamos dos listas, NOMBRE$ y TEL$, cada una con capacidad 
para 100 elementos. Pero tenemos que informar al ordenador de nuestras intenciones, y para 
ello debemos dimensionar las listas con la instruction DIM. Cambiemos las lineas 20 y 30: 

20 DIM NOMBRE$(100) 
30 DIM TEL$(100) 

Ahora ya podemos escribir el tramo del programa que nos va a permitir introducir nombres 
y mimeros de telefono. Anada las siguientes lineas: 

40 FOR x=1 TO 100 

50 INPUT;" Nombre ";NOMBRE$(x) 

60 INPUT " Telefono ";TEL$(x) 

70 NEXT 

run 

Pero no es probable que vayamos a introducir los 100 nombres de una vez, y ademas la 
forma de presentation en la pantalla es muy desordenada. Tenemos que organizarnos me- 
jor. En primer lugar, antes de captar un nombre, vamos a librarnos de todo el texto super- 
fluo que tenemos en la pantalla: 

45 els 

iQue podemos hacer para decirle al ordenador que de momento ya no queremos introducir 
mas datos? Podemos detener el programa pulsando [escI dos veces, pero cuando volvamos 
a teclear run perderemos todos los datos introducidos anteriormente. 

Esta es la solution. Cada vez que el programa capte un nuevo nombre, haremos que exami- 
ne el dato introducido para ver si consta de al menos un caracter o si, por el contrario, es 
la 'cadena vacia'. Si lo es, haremos que suspenda la captation de datos. Anada lo siguiente: 

55 IF NOMBRE$(x) = "" THEN 80 

80 PRINT "Fin de la entrada de datos" 

Tambien necesitamos que el ordenador indique al usuario que debe hacer para suspender 
la introduction de datos. Anada, pues, la siguiente linea: 

47 PRINT "Pulse [INTRO] para terminar" 
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Ahora vamos a escribir las instrucciones que exhiban en la pantalla la informacion almace- 
nada. Primero la lista completa: 

90 FOR x = 1 TO 100 

100 PRINT NOMBRE$(x);" ";TEL$(x) 

110 NEXT 

Otra vez nos ocurre que el programa no sabe donde pararse y continiia hasta el centesimo 
elemento. Esto tiene facil arreglo: 

95 IF NOMBRE$(x) = "" THEN 120 
120 PRINT "Fin de la lista" 

La li'nea 95 comprueba si NOMBRE$(x) es la cadena vacia; si lo es, concluye la escritura 
de la lista saltando a la li'nea 120. 

Atendamos a los otros requisitos que habiamos formulado al idear el programa. Necesita- 
mos unas instrucciones que busquen en la lista un nombre introducido por el ususario. Es- 
criba lo siguiente: 

130 INPUT "Buscar ";BUSCA$ 

140 FOR x=1 TO 100 

150 IF INSTR(NOMBRE$(x),BUSCA$)=0 THEN 180 

160 PRINT NOMBRE$(x);" ";TEL$(x) 

170 END 

180 NEXT 

190 PRINT'No lo encuentro" 

En la li'nea 150 hay una instruction nueva: INSTR. Esta instruction determina si la cadena 
literal BUSCA$ (que es el nombre que estamos buscando, captado en la linea 130) esta con- 
tenida en NOMBRE$(x). Si no lo esta, INSTR genera el valor 0, y entonces el programa 
salta a la linea 180 para probar con el siguiente valor de x. Si el programa ha examinado 
sin exito todos los elementos de la lista, continiia en la linea 190, donde informa de lo que 
ha ocurrido. En cambio, si encuentra el nombre, INSTR produce un valor mayor que 0, 
lo que permite que el programa pase de la linea 150 a la 160 para escribir el nombre y el 
niimero de telefono y luego terminar con la instruction END de la linea 170. 

Como ve, nuestro programa avanza muy deprisa, pero todavia nos queda mucho por hacer. 
Meditemos un poco sobre los inconvenientes de este programa, empezando por el orden en 
que funciona: primero capta la informacion, despues la escribe completa en la pantalla, lue- 
go busca un nombre concrete 



^Que ocurre si 



Precisamente. iQue ocurre si no queremos que los acontecimientos se produzcan en ese or- 
den? Podriamos querer consultar un telefono que introdujimos ayer. O podriamos querer 
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ampliar la lista con otros nombres. Esto nos plantea nuevos problemas, para los que tene- 
mos que encontrar solucion. Despues de todo, en esto es en lo que consiste la programa- 
cion. Ya hemos dicho que BASIC es muy amable y nos permite rectificar e incluir nuevas 
instrucciones con gran facilidad; pero un buen programador habrfa pensado en todo esto 
de antemano. 

Otro grave inconveniente del programa consiste en que las listas quedan almacenadas sola- 
mente en la memoria, la cual se borra cada vez que se apaga el ordenador. De poco nos 
servin'a este programa si tuvieramos que escribir todos los datos cada vez que lo ejecutase- 
mos; asi pues, necesitamos que el programa pueda grabar los valores de los elementos de 
NOMBRE$ y TEL$ antes de que apaguemos el ordenador, y tambien que pueda cargar los 
datos cada vez que lo ejecutemos. 



Soluciones 

El primero de los problemas mencionados (el del orden de ejecucion) se resuelve haciendo 
que el programa de la posibilidad de elegir entre las funciones que sabe realizar. De un pro- 
grama de este tipo se dice que esta 'controlado por menu' pues, en efecto, ofrece un menu 
de opciones de entre las cuales se elige la deseada. Si alguna vez ha sacado dinero de un 
cajero automatico, ya ha utilizado un programa de ordenador controlado por menu. Ana- 
damos un menu a nuestro programa: 

32 PRINT'"!. Introd. datos" 

33 PRINT"2. Listado" 

34 PRINT"3. Busqueda" 

35 PRINT"4. Grabar de datos" 

36 PRINT"5. Cargar datos" 

37 INPUT "Elija una opcion (1-5) ";el 

38 ON el GOSUB 40,90,130 

85 RETURN 
125 RETURN 
170 RETURN 
200 RETURN 

Hemos hecho que el programa escriba la lista de opciones y que capte la election del usuario 
mediante una instruccion INPUT para asignarla a la variable el. La instruccion ON el 
GOSUB de la h'nea 38 funciona de la siguiente forma: si el = 1, invoca la subrutina de la 
linea 40; si el =2, invoca la subrutina de la linea 90, etc. 

Puesto que todas las funciones estan ahora en subrutinas (controladas por la instruccion 
ON el GOSUB), tienen que terminar en una instruccion RETURN. De ahi que hayamos 
incluido las lineas 85, 125, 170 y 200. 

iRecuerda para que sirve RETURN? Hace que BASIC retorne de la subrutina a la instruc- 
cion siguiente a aquella que invoco la subrutina. En nuestro caso, el punto de retorno es 
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la instruction siguiente a la lfnea 38, que es la linea 40. Si dejamos que esto ocurra, el pro- 
grama entra en la subrutina de 'Introduction de datos'. Para impedirlo afiadlmos la linea 

39 GOTO 32 

que reconduce el programa al menu. 

Ejecute el programa y vea cuanto hemos progresado. 

Bien; vamos a echar un vistazo al listado. (Detenga el programa pulsando j esc] dos veces.) 
Escriba: 

LIST 

Esto es lo que tenemos por el momento: 

10 REM guia de telefonos 
20 DIM NOMBRE$(100) 
30 DIM TEL$(100) 

32 PRINT'"!. Introd. datos" 

33 PRINT"2. Listado" 

34 PRINT"3. Busqueda" 

35 PRINT"4. Grabar datos" 

36 PRINT"5. Cargar datos" 

37 INPUT "Elija una opcion (1-5) ";el 

38 ON el GOSUB 40,90.130 

39 GOTO 32 

40 FOR x = 1 TO 100 
45 CLS 

47 PRINT'Pulse [INTRO] para terminar" 

50 INPUT;" Nombre ";NOMBRE$(x) 

55 IF NOMBRE$(x) = "" THEN 80 

60 INPUT;" Telefono ";TEL$(x) 

70 NEXT 

80 PRINT "Fin de la entrada de datos" 

85 RETURN 

90 FOR x = 1 TO 100 

95 IF NOMBRE$(x) = "" THEN 120 

100 PRINT NOMBRE$(x);" ";TEL$(x) 

110 NEXT 

120 PRINT "Fin de la lista" 

125 RETURN 

130 INPUT "Buscar ";BUSCA$ 

140 FOR x=1 TO 100 

150 IF INSTR(NOMBRE$(x),BUSCA$)=0THEN 180 

160 PRINT NOMBRE$(x);" ";TEL$(x) 

170 END 
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180 NEXT 

190 PRINT'No lo encuentro" 

200 RETURN 

Observe que en algunas zonas del programa las instrucciones estan muy apretadas y no de- 
jan hueco para introducir otras nuevas. Reorganicemos el programa renumerando las 11- 
neas. Escriba: 

RENUM 
LIST 

El listado es ahora: 

10 REM guia de telefonos 

20 DIM NOMBRE$(100) 

30 DIM TEL$(100) 

40 PRINT"1. Introd. datos" 

50 PRINT"2. Listado" 

60 PRINT"3. Busqueda" 

70 PRINT"4. Grabar datos" 

80 PRINT"5. Cargar datos" 

90 INPUT "Elija una opcion (1-5) ";el 

100 ON el GOSUB 120,210,270 

110 GOTO 40 

120 FOR x=1 TO 100 

130 CLS 

140 PRINT'Pulse [INTRO] para terminar" 

150 INPUT;" Nombre ";NOMBRE$(x) 

160 IF NOMBRE$(x) = "" THEN 190 

170 INPUT;" Telefono ";TEL$(x) 

180 NEXT 

190 PRINT "Fin de la entrada de datos" 

200 RETURN 

210 FOR x=1 TO 100 

220 IF NOMBRE$(x) = "" THEN 250 

230 PRINT NOMBRE$(x);" ";TEL$(x) 

240 NEXT 

250 PRINT "Fin de la lista" 

260 RETURN 

270 INPUT "Buscar ";BUSCA$ 

280 FOR x=1 TO 100 

290 IF INSTR(NOMBRE$(x),BUSCA$)=0 THEN 320 

300 PRINT NOMBRE$(x);" ";TEL$(x) 

310 END 

320 NEXT 

330 PRINT'No lo encuentro" 

340 RETURN 
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jMucho mas limpio! Pero sigamos con el programa. Ahora queremos que cada vez que in- 
troduzcamos un dato nuevo (nombre y niimero), el ordenador lo coloque al final de la lista 
actual, en el primer lugar que encuentre vacio. En esta ocasion vamos a utilizar la instruc- 
tion LEN para determinar la longitud de una cadena literal. Especificaremos lo siguiente: 

Si (IF) la longitud de NOMBRE$(x) es mayor que 0, es decir, si ya hay un dato en 
ese elemento de la lista, entonces (THEN) ir a la linea 180 (que provoca el salto al 
siguiente elemento de la lista): 

135 IF LEN(NOMBRE$(x))>0 THEN 180 

Una solution sencilla, ^.verdad? Los problemas de este tipo siempre tienen solution si cono- 
cemos bien el repertorio de instrucciones y nos paramos a pensar un poco. Para casi todas 
las necesidades hay casi siempre al menos una instruction; cuanto mayor es la experiencia 
en programacion, mas inmediatas son las soluciones. 

Vamos con otro requisito del programa: grabar los valores de las variables para poder car- 
garlos mas tarde. En la parte 6 del 'Curso de introduction' hemos explicado como grabar 
programas (con la orden SAVE). Pero el programa no es mas que la herramienta que nos 
permite captar y manipular los datos; cuando grabamos el programa solo estamos guardan- 
do la herramienta, no los valores de las variables. 

Asi pues, tenemos que escribir una section del programa que grabe los valores de las varia- 
bles. Para ello crearemos un 'fichero de datos'. 

Lo primero es abrir (OPEN) un fichero en direction de salida (OUT) dandole el nombre 
de 'datos'. Despues escribiremos (WRITE) los valores de las variables NOMBRE$(x) y 
TEL$(x), de 1 a 100, en el fichero; finalmente, cerraremos (CLOSE) el fichero y retornare- 
mos (RETURN) al menu. Pondremos esta rutina en las lineas 350 y siguientes. Para no te- 
ner que escribir los numeros de linea, ejecutaremos la orden 

AUTO 350 

que inicia la numeration automatica de las lineas a partir del niimero 350: 

350 OPENOUT "Idatos" 

360 FOR x = 1 TO 100 

370 WRITE #9,NOMBRE$(x),TEL$(x) 

380 NEXT 

390 CLOSEOUT 

400 PRINT'Fin de la grabacion de los datos" 

410 RETURN 

Cuando haya terminado de teclear la linea 410 y haya pulsado [Intro], pulse [escj para in- 
terrumpir la funcion AUTO. 

Como tenemos una rutina mas, tendremos que poner otro niimero de linea en la instruction 
ON el GOSUB de la linea 100. Para ello vamos a corregir (editar, EDIT) la linea 100: 

100 ON el GOSUB 120,210,270,350 
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A partir de ahora, cada vez que elijamos la option 4 del menu, el programa grabara el fiche- 
ro de datos en la cinta. 

Observe la lfnea 370, en la que se escriben los valores de NOMBRE$(x) y TEL$(x) en la 
cinta: la expresion #9 que aparece despues de WRITE es un 'indicador de canal' que especi- 
fica a que canal debe el ordenador enviar los datos. El ordenador maneja 10 canales: 

Los ocho primeros (#0 a #7) dirigen los datos a la pantalla [bien a la pantalla completa, 
bien a alguna ventana (WINDOW)]. 

El canal #8 es el de la impresora. 

Finalmente, el canal #9 es el que conecta el ordenador con el magnetofono; este es el que 
utilizamos en la instruction 370. 

Ya hemos escrito las instrucciones que graban los datos en la cinta. Ahora nos falta ocupar- 
nos de la lectura de los datos para ponerlos a disposition del programa. Como vamos a 
escribir una nueva rutina, tendremos que poner otro numero de linea en la instruction ON 
el GOSUB. Editemos la linea 100: 

100 ON el GOSUB 120,210,270,350,420 

Para leer los datos tenemos que empezar por abrir (OPEN) en direction de entrada (IN) el 
fichero que tenemos en la cinta con el nombre de 'datos'. Despues leemos con INPUT (por 
el canal #9) los valores de las variables NOMBRE$(x) y TEL$(x), de 1 a 100, y finalmente 
cerramos (CLOSE) el fichero y retornamos (INTRO) al menu. Escriba las siguientes h'neas: 

420 OPENIN "Idatos" 

430 FOR x=1 TO 100 

440 INPUT #9,NOMBRE$(x),TEL$(x) 

450 NEXT 

460 CLOSEIN 

470 PRINT'Fin de la carga de los datos" 

480 RETURN 



El fin del principio 



Por fin hemos conseguido un programa que realiza todas las funciones previstas. Todo lo 
que nos queda ahora es ocuparnos de como presentar los resultados en la pantalla. 



£1 principio del fin 

Para mejorar el manejo de la pantalla vamos a anadir unas cuantas instrucciones: 
34 MODE 1 
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Esta instruction establece el modo de pantalla y borra la pantalla al principio del programa. 
Anada ahora lo siguiente: 

36 WINDOW #1,13,30,10,14 

No se deje impresionar por esta instruction aparentemente tan complicada. Lo que hemos 
hecho es definir una ventana en la pantalla para escribir en ella el menu. Despues de la pala- 
bra WINDOW, lo primero que ponemos es el niimero del canal al que vamos a asignarla; 
recuerde que podemos elegir cualquiera entre el y el 7. Ahora bien, si tenemos en cuenta 
que todos los textos que enviamos a la pantalla sin especificar niimero de canal circulan 
por el #0, no vamos a dar este niimero a nuestra ventana. Elegimos, pues, el niimero 1. 
Los cuatro mimeros que vienen a continuation especifican el tamafio de la ventana. Su sig- 
nificado no podia ser mas sencillo: columna del borde izquierdo, columna del derecho, pri- 
mera fila y ultima fila, por este orden. En nuestro caso, despues de especificar el canal #1, 
hemos dicho al ordenador que la ventana empieza en la columna niimero 13 y termina en 
la niimero 30, en horizontal, y empieza en la fila 10 y termina en la 14, en vertical. 

Para dirigir los textos del menu al canal #1 debemos editar las lineas 40 a 80: 

40 PRINT #1,"1. Introd. datos" 
50 PRINT #1,"2. Listado" 
60 PRINT #1,"3. Busqueda" 
70 PRINT #1,"4. Grabar datos" 
80 PRINT #1,"5. Cargar datos" 

Anadamos tambien 

85 LOCATE 7,20 

para situar el texto de la h'nea 90. 

Para borrar la pantalla cada vez que el programa retorne al menu, modifiquemos la linea 
110: 

110 GOTO 34 

Ademas, para borrar la pantalla cada vez que se selecciona una option del menii anadimos: 
95 CLS 

Finalmente, incluiremos las tres lineas siguientes para hacer que el retorno al menu sea con- 
trolado por el usuario: 

103 LOCATE 9,20 

105 PRINT "Pulse una tecla para volver al menu" 

107 IF INKEY$ = "" THEN 107 
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La linea 103 especifica donde se debe escribir el mensaje de la linea 105. La linea 107 exami- 
na el teclado para averiguar si se ha pulsado alguna tecla. Si no se ha pulsado ninguna, 
INKEY$ genera la cadena vacia y entonces se repite la ejecucion de la linea hasta que efecti- 
vamente se pulse alguna. Esta es la forma habitual de programar la espera 'hasta que el 
usuario se decida', pues BASIC no pasa a la linea siguiente mientras no se pulse una tecla. 

Bueno, ya hemos terminado. O quiza no, porque podriamos incluir la posibilidad de modi- 
ficar o borrar nombres y numeros de telefono, de ordenarlos alfabeticamente, de listarlos 
por la impresora, etc. Todas estas mejoras son posibles; podriamos seguir mejorando y de- 
purando el programa indefinidamente, pero en algiin momento tenemos que poner el punto 
y aparte, y este es tan bueno como cualquier otro. Le dejamos, pues, con este programa 
de 'guia de telefonos', confiando en haberle abierto las puertas del arte de programar. Ade- 
cente el programa con la orden 

RENUM 

y grabelo en cinta; o borrelo si no le gusta. Quien sabe; quiza pueda necesitarlo algiin dia. 
Listado final: 

10 REM guia de telefonos 

20 DIM NOMBRE$(100) 

30 DIM TEL$(100) 

40 MODE 1 

50 WINDOW #1,13,30,10,14 

60 PRINT #1,"1. Introd. datos" 

70 PRINT #1,"2. Listado" 

80 PRINT #1,"3. Busqueda" 

90 PRINT #1,"4. Grabar datos" 

100 PRINT #1,"5. Cargar datos" 

110 LOCATE 7,20 

120 INPUT "Elija una opcion (1-5) ";el 

130 CLS 

140 ON el GOSUB 190,290,350,430,500 

150 LOCATE 9,20 

160 PRINT'Pulse una tecla para volver al menu" 

170 IF INKEY$ = "" THEN 170 

180 GOTO 40 

190 FOR x = 1 TO 100 

200 CLS 

210 IF LEN(NOMBRE$(x))>0 THEN 260 

220 PRINT'Pulse [INTRO] para terminar" 

230 INPUT;" Nombre ";NOMBRE$(x) 

240 IF NOMBRE$(x) = "" THEN 270 

250 INPUT;" Telefono ";TEL$(x) 

260 NEXT 

270 PRINT "Fin de la entrada de datos" 
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280 RETURN 

290 FOR x = 1 TO 100 

300 IF NOMBRE$(x) = "" THEN 330 

310 PRINT NOMBRE$(x);" ";TEL$(x) 

320 NEXT 

330 PRINT "Fin de la lista" 

340 RETURN 

350 INPUT "Buscar ";BUSCA$ 

360 FOR x = 1 TO 100 

370 IF INSTR(NOMBRE$(x),BUSCA$)=0 THEN 400 

380 PRINT NOMBRE$(x);" ";TEL$(x) 

390 END 

400 NEXT 

410 PRINT'No lo encuentro" 

420 RETURN 

430 OPENOUT "Idatos" 

440 FOR x = 1 TO 100 

450 WRITE #9,NOMBRE$(x),TEL$(x) 

460 NEXT 

470 CLOSEOUT 

480 PRINT'Tin de la grabacion de los datos" 

490 RETURN 

500 OPENIN "Idatos" 

510 FOR x = 1 TO 100 

520 INPUT #9,NOMBRE$(x),TEL$(x) 

530 NEXT 

540 CLOSEIN 

550 PRINT'Tin de la carga de los datos" 

560 RETURN 
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Capitulo 3 

Lista completa de las palabras clave del 

BASIC de AMSTRAD 



IMPORTANTE 

Es imprescindible que usted comprenda la terminologia y la notation 
utilizadas en este capitulo. Para describir la sintaxis de las diversas ins- 
trucciones utilizamos tanto parentesis como corchetes. Es necesario dis- 
tinguirlos, pues tienen significados diferentes. 

Toda instruction, o parte de instruction, no encerrada entre corchetes debe ser escrita tal 
como aqui se muestra. Por ejemplo, la instruction END tiene la forma: 

END 

Usted tiene que escribir la palabra END literalmente. 

Cuando un texto esta encerrado entre corchetes angulados, por ejemplo 

{numero de linea) 

no hay que teclear ni los corchetes ni las palabras en ellos incluidas. El texto es una indica- 
tion del tipo de datos que se debe escribir. Por ejemplo, 

EDIT {numero de linea) 

significa que hay que escribir la palabra EDIT y a continuation un espacio y un numero 
de linea: 

EDIT 100 

Los parentesis ordinarios ( ) son obligatorios y han de ser tecleados explicitamente. Por 
ejemplo, 

COS{(expresi6n numerica)) 

exige que se escriban los parentesis rodeando la expresion numerica cuyo coseno se quiera 
calcular: 

PRINT COSI45) 
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Finalmente, los corchetes delimitan elementos opcionales. Por ejemplo, 

RUN [(numero de linea)] 

significa que no es necesario poner un parametro despues de la palabra clave RUN, pero 
que si se puede incluir ese parametro; ademas, en caso de incluirlo, tiene que ser necesaria- 
mente un numero de linea: 

RUN o RUN 100 



Caracteres especiales 



& o &H Prefijo para constante hexadecimal 
&X Prefijo para constante binaria 

# Prefijo para indicador de canal 



Tipos de datos 



Las cadenas literales pueden contener entre y 255 caracteres. Una < expresion literal) es 
una expresion que toma como valor una cadena literal. Las cadenas literales se pueden con- 
catenar (unir) con el operador + , a condicion de que la cadena resultante no tenga mas de 
255 caracteres. 

Los datos numericos pueden ser enteros o reales. En este sentido, los enteros tienen la limi- 
tation adicional de estar comprendidos entre -32768 y +32767. El ordenador maneja nii- 
meros reales con precision ligeramente superior a nueve digitos. Los mimeros reales estan 
comprendidos en el margen ± 1 .7E + 38 . El menor valor mayor que cero es aproximadamen- 
te 2.9E-39. 

Una < expresion numerica) es una expresion que toma como valor un numero. Puede con- 
sistir en numeros concretos, en una variable numerica o en combinaciones de ambos: cual- 
quier cosa que no sea una < expresion literal). 

Una < expresion de numero de canal) es una < expresion numerica) que identifica una ven- 
tana de la pantalla, la impresora o el sistema de cinta. 

Una <lista de:<elemento) describe un parametro que esta formado por una lista de elemen- 
tos separados por comas. Puede contener uno o varios elementos, sin mas limitation que 
la longitud de la linea. 

Los indicadores de tipo son: 

% Entero 

! Real (por defecto) 

$ Literal 
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La lista de las palabras clave tiene la siguiente estructura: 



PALABRA CLAVE 

Sintaxis 

Ejemplo 

Description 

Palabras clave asociadas 

Las palabras clave pueden ser: 

Ordenes: operaciones que se ejecutan directamente. 

Funciones: operaciones que intervienen como argumentos de una expresion. 

Operadores: operaciones que actiian sobre argumentos matematicos. 

BASIC convierte todas las palabras clave de minusculas a mayiisculas cuando se lista el pro- 
grama. En los ejemplos las mostraremos en mayiisculas. Es conveniente que usted las intro- 
duzca en minusculas, pues entonces le sera mas facil detectar los errores, dado que las pala- 
bras clave erroneamente tecleadas seguiran apareciendo en minuscula en los listados. 

Lista de palabras clave 

ABS 

A B S ( < expresion n umerica > ) 

PRINT ABSI-67.98) 
67.98 

Funcion. Calcula el valor absoluto de la expresion dada; es decir, convierte los mimeros 
negativos en positivos. 

Palabras clave asociadas: SGN. 

AFTER 

AFTER {retardo del temporizador)[,(numero de temporizador)] GOSUB 
{numero de linea) 
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10 AFTER 250 GOSUB 60:CLS 

20 PRINT "Adivine una letra en 5 segundos" 

30 a$=INKEY$:IF indicador = 1 THEN END 

40 IF a$<>CHR$(INT(RND*26 + 97)) THEN 30 

50 PRINT a$;" es correcto. Usted gana." 

55 SOUND 1,478:SOUND 1,358:END 

60 PRINT "demasiado tarde. Yo gano." 

70 SOUND 1,2000:indicador=1:RETURN 

run 

Orden. Invoca una subrutina de BASIC cuando ha transcurrido el tiempo especificado. El 
parametro <retardo del temporizador > especifica el tiempo en unidades de 0.02 s (cincuen- 
tavos de segundo). 

El <numero de temporizador) (margen de a 3) especifica cual de los cuatro temporizado- 
res disponibles debe medir el tiempo. El temporizador numero 3 tiene la maxima prioridad; 
el (que es el implicito), la minima. 

Cada temporizador puede tener una subrutina asociada. 

Para mas amplia information sobre las interrupciones, consulte la parte 2 del capitulo titu- 
lado 'Cuando usted guste . . .'. 

Palabras clave asociadas: EVERY, REMAIN, RETURN. 



AND 

{argumento) AND {argumento) 

IF "juan'Vpepe" AND "perro">"gato" THEN PRINT "verdadero" ELSE PRINT "falso" 

verdadero 

IF "pepe"<"juan" AND "gato'Xperro" THEN PRINT "verdadero" ELSE PRINT "falso" 

falso 

IF "juan"<"pepe" AND "gato">"perro" THEN PRINT "verdadero" ELSE PRINT "falso" 

falso 

PRINT 1 AND 1 

1 
PRINT AND 


PRINT 1 AND 
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Operador. Realiza la operation logica 'y' bit a bit entre enteros. El resultado es a menos 
que ambos bits sean 1. 

Para mas amplia information sobre operaciones logicas, consulte la parte 2 del capitulo ti- 
tulado 'Cuando usted guste . . . ' . 

Palabras clave asociadas: OR, NOT, XOR. 

ASC 

ASC[<.expresi6n literal)) 

PRINT ASCC'x") 
120 

Funcion. Calcula el codigo ASCII del primer caracter de la <expresion literal). 
Palabras clave asociadas: CHR$. 

ATN 

ATN[<.expresion numerica)) 

PRINT ATN{1) 
0.785398163 

Funcion. Calcula el arco cuya tangente es la <expresion numerica). 

Observese que se puede utilizar DEG y RAD para hacer que el resultado se de en grados 
o en radianes, respectivamente. 

Palabras clave asociadas: COS, DEG, RAD, SIN, TAN. 

AUTO 

AUTO [{numero de linea)][,(.incremento)] 

AUTO 100,50 

Orden. Genera numeros de linea AUTOmaticamente. El parametro optional < numero de 
linea) especifica en que numero debe empezar la numeration. Si se lo omite, el ordenador 
genera numeros de linea a partir del 10. 

El parametro optional <incremento> especifica el salto que debe haber entre cada linea y 
la siguiente. Si se lo omite, el ordenador genera numeros de linea espaciados de 10 en 10. 

Si se genera un numero de linea que ya ha sido utilizado, el ordenador informa del hecho 
mostrando un asterisco a la derecha del numero. 
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Para interrumpir el proceso de numeration automatica se pulsa |esc| . 
Palabras clave asociadas: ninguna. 

BIN$ 

BlN$«.expresi6n entera)[, {expresion entera)]) 

PRINT BIN${64,8) 
01000000 

Funcion. Produce una cadena de digitos binarios que representan el valor de la primera 

< expresion entera), utilizando el niimero de digitos binarios especificados por la segunda 

< expresion entera) (margen de a 16). Si el niimero de digitos especificado es mayor que 
el necesario, la expresion resultante se completa con ceros por la izquierda; si el niimero 
de digitos especificado es demasiado pequeno, la expresion resultante no se trunca, sino que 
contiene todos los digitos que sean necesarios. 

La < expresion entera) que se va a convertir en binario debe tener un valor comprendido 
entre -32768 y +65535. 

Palabras clave asociadas: HEX$, STR$. 
BORDER 

BORDER <co/orH.(co/or)] 

10 REM 729 combinaciones para el borde! 

20 SPEED INK 5,5 

30 FOR a = 0TO 26 

40 FOR b=0 TO 26 

50 BORDER a,b:CLS:LOCATE 14,13 

60 PRINT "border";a;",";b 

70 FOR t = 1 TO 500 

80 NEXT t,b,a 

run 

Orden. Cambia el color del borde de la pantalla. Si se especifican dos colores, el del borde 
alterna entre ambos, a una velocidad que se puede regular con la orden SPEED INK. El 
margen de colores es de a 26. 

Palabras clave asociadas: SPEED INK. 

BREAK 

Vease ON BREAK GOSUB, ON BREAK STOP. 



3/6 Lista completa de las palabras clave del BASIC de AMSTRAD 



CALL 

CALL {expresion de direccion de memoria)[, {lista de:{parametro)] 

CALLO 

Orden. Permite invocar desde BASIC una rutina escrita en codigo de maquina. El ejemplo 
anterior provoca la reinicializacion de la maquina. 

Esta orden no debe ser utilizada si no se sabe cuales son sus efectos. 

Palabras clave asociadas: UNT. 

CAT 

CAT 

CAT 

Orden. Hace que BASIC se ponga a examinar la cinta y de una lista de los ficheros que 
va encontrando. Para cada fichero muestra cada uno de los bloques integrantes, con el si- 
guiente formato: 

NOMBREDEFICHERO Numerodebloque Indicador Ok 

El Indicador puede ser: 

$ para programas de BASIC no protegidos 
% para programas de BASIC protegidos 
* para ficheros ASCII 
& para ficheros binarios 

El mensaje Ok aparece al final de cada linea para indicar que el ordenador ha leido el fiche- 
ro sin incidentes; es decir, que habria podido cargar el fichero de haberlo intentado. 

Si un fichero ha sido grabado sin nombre, CAT escribe: 

Unnamed file 

Esta orden no afecta al programa actualmente residente en la memoria. 
Palabras clave asociadas: LOAD, RUN, SAVE. 

CHAIN 

CHAIN {nombre de fichero)[, (expresion de numero de /inea)] 
CHAIN "programa",350 
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Orden. Lee un programa grabado en cinta y lo carga en la memoria reemplazando al actual. 
Inicia la ejecucion del nuevo programa, bien desde el principio, bien desde una linea especi- 
ficada por el parametro opcional <expresion de numero de linea). 

Si no se especifica nombre de fichero, BASIC intenta cargar el primer fichero valido que 
encuentra en la cinta. Si el primer caracter del nombre es !, BASIC suprime tanto este carac- 
ter como todos los mensajes que de otra forma generaria el sistema de lectura de la cinta. 

Los ficheros protegidos (grabados con SAVE ... ,p) se pueden cargar y ejecutar con esta 
orden. 

Palabras clave asociadas: CHAIN MERGE, LOAD, MERGE. 



CHAIN MERGE 

CHAIN MERGE {nombre de fichero)[.(expresion de numero de linea)] 

[.DELETE {margen de numeros de linea)] 

CHAIN MERGE "nuevoprograma",750,DELETE 400-680 

Orden. Lee un programa grabado en el disco, lo carga en la memoria mezclandolo con el 
actual y empieza a ejecutar el programa resultante, bien desde el principio, bien desde una 
linea especificada por el parametro opcional <expresion de numero de linea). Si se desea 
borrar parte del programa original antes de iniciar la carga del nuevo, se puede utilizar la 
option DELETE <margen de numeros de linea). 

Observese que las lineas del programa que se carga sustituyen a las que tuvieran el mismo 
numero en el programa original. 

Si no se especifica nombre de fichero, BASIC intenta cargar el primer fichero valido que 
encuentra en la cinta. Si el primer caracter del nombre es !, BASIC suprime tanto este carac- 
ter como todos los mensajes que de otra forma generaria el sistema de lectura de la cinta. 

CHAIN MERGE conserva los valores actuales de las variables, pero descarta las funciones 
definidas por el usuario y abandona los ficheros que esten abiertos. Ademas, desactiva la 
interception de errores que pueda haber sido activada con ON ERROR GOTO, ejecuta im- 
plicitamente una orden RESTORE, reinicializa todas las caracteristicas establecidas con 
DEFINT, DEFREAL y DEFSTR y abandona las instrucciones FOR, WHILE y GOSUB que 
esten activas. 

Los ficheros protegidos (grabados con SAVE ... ,p) no se pueden cargar con esta orden. 
Palabras clave asociadas: CHAIN, DELETE, LOAD, MERGE. 



CHR$ 

CHR${ (expresion entera)) 



3/8 Lista completa de las palabras clave del BASIC de AMSTRAD 



10 FOR x=32 TO 255 
20 PRINT x;CHR$(x), 
30 NEXT 
run 

Funcion. Convierte la (expresion entera), que tiene que estar en el margen de a 255, en 
su caracter equivalente. El conjunto de caracteres del AMSTRAD se muestra en la parte 
3 del capi'tulo titulado 'Para su referenda . . .'. 

Observese que los niimeros a 31 generan caracteres de control; por esa razon los hemos 
excluido del ejemplo anterior. 

Palabras clave asociadas: ASC, LEFT$, MID$, RIGHT$, STR$. 



CINT 

C\NT[(expresi6n numerica)) 

10 n = 1.9999 
20 PRINT CINT(n) 
run 
2 

Funcion. Aproxima el valor de la (expresion numerica) a un niimero entero comprendido 
en el margen de -32768 a +32767. 

Palabras clave asociadas: CREAL, FIX, INT, ROUND, UNT. 

CLEAR 

CLEAR 

CLEAR 

Orden. Borra todas las variables (iguala a cero las numericas y a la cadena vacia las litera- 
les). Ademas, se abandonan los ficheros que esten abiertos, se borran todas las listas y fun- 
ciones definidas por el usuario y BASIC retorna al modo de radianes para el calculo de fun- 
ciones trigonometricas. 

CLG 

CLG [<f/>?fa>] 

LOCATE 1,20 
CLG 3 
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Orden. Borra la pantalla grafica, dejandola del color del papel de graficos. Si se especifica 
la <tinta>, el papel de graficos toma ese color. 

Palabras clave asociadas: CLS, INK, ORIGIN. 



CLOSEIN 

CLOSEIN 

CLOSEIN 

Orden. Cierra el fichero que este abierto en direccion de entrada (si lo hay). (Vease 
OPENIN.) 

Palabras clave asociadas: EOF, OPENIN. 



CLOSEOUT 

CLOSEOUT 

CLOSEOUT 

Orden. Cierra el fichero que este abierto en direccion de salida (si lo hay). (Vease 
OPENOUT.) 

Palabras clave asociadas: OPENOUT. 



CLS 

CLS [# {expresion de numero de canal)] 

10 PAPER #2,3 
20 CLS #2 
run 

Orden. Borra la ventana (canal de pantalla) especificada, tinendola del color del papel. Si 
no se especifica ninguna < expresion de numero de canal), el ordenador borra la pantalla #0. 

Palabras clave asociadas: CLG, INK, PAPER, WINDOW. 



3/10 Lista completa de las palabras clave del BASIC de AMSTRAD 



CONT 

CO NT 

CONT 

Orden. Reanuda la ejecucion del programa cuando este ha sido interrumpido, bien porque 
se ha pulsado la tecla ESC| dos veces, bien porque el programa ha encontrado la instruc- 
tion STOP. CONT solamente puede continuar el programa en el supuesto de que no se lo 
haya modificado durante la interruption y de que no se trate de un programa protegido. 

Palabras clave asociadas: STOP. 
COS 

COS( < expresion numerica ) ) 

DEG 

PRINT COS{45) 
0.707106781 

Funcion. Calcula el coseno de la < expresion numerica). 

Observese que se puede utilizar DEG y RAD para hacer que el ordenador entienda los arcos 
como dados en grados o en radianes, respectivamente. 

Palabras clave asociadas: ATN, DEG, RAD, SIN, TAN. 

CREAL 

CREAL{<expres/d/7 numerica)) 

10 a = PI 

20 PRINT CINT(a) 

30 PRINT CREAUa) 

run 

3 

3.14159265 

Funcion. Convierte el valor de la < expresion numerica), cualquiera que sea su tipo, en un 
niimero real. 

Palabras clave asociadas: CINT. 
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DATA 

DATA {lista de:{constante) 

10 FOR x=1 TO 4 

20 READ nombre$,apellido$ 

30 PRINT "Don ";nombre$;" ";apellido$ 

40 NEXT 

50 DATA Manuel, Gonzalez, Daniel, Garcia 

60 DATA Felipe,Revilla, Ernesto, Diaz 

run 

Orden. Identifica las lineas en las que estan contenidos los datos que pueden ser leidos con 
la instruction READ. Cada vez que se lee un dato, el 'puntero' pasa a senalar el siguiente 
elemento de la lista. Se puede utilizar la instruction RESTORE para hacer que el puntero 
senale una linea de datos determinada. 

En la parte 2 del capitulo titulado 'Cuando usted guste . . . ' daremos mas amplia informa- 
tion sobre los datos de este tipo. 

Palabras clave asociadas: READ, RESTORE. 



DEF FN 

DEF FN<.nombre de la funcion)[({parametros formales))~\ = {expresi6n) 

10 t=TIME/300 

20 DEF FNreloj = INT(TIME/300-t) 

30 EVERY 100 GOSUB 50 

40 GOTO 40 

50 PRINT "El programa se ejecuto hace"; 

60 PRINT FNreloj;"segundos" 

70 RETURN 

run 

Orden. BASIC permite que el programa defina y utilice funciones. DEF FN realiza la pri- 
mera parte de ese mecanismo: crea una funcion especifica del programa; una vez definida, 
la funcion se maneja de la misma forma que las funciones intrinsecas de BASIC. 

(Notese en el ejemplo anterior que el valor de la funcion FNreloj sigue siendo actualizada 
ininterrumpidamente, aunque se imponga una pausa al programa pulsando [esc] dos veces 
para luego reanudarlo con CONT.) 
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DEFINT 

DEFINT {lista de:(margen de letras) 

10 DEFINT n 
20 numero = 123.456 
30 PRINT numero 
run 
123 

Orden. Cada vez que el programa encuentra una variable que no vaya seguida de un indica- 
dor exph'cito de tipo (! % $), el ordenador considera que es del tipo implicito. Esta orden 
hace que el tipo implicito sea 'variable entera'. La orden afecta a todas las variables cuyos 
nombres empiecen por la letra o letras especificadas. Se puede especificar una lista: 

DEFINT a, b,c 

o bien un margen de iniciales: 

DEFINT a-z 
Palabras clave asociadas: DEFREAL, DEFSTR. 

DEFREAL 

DEFREAL {lista de:(margen de letras) 

DEFREAL x,a-f 

Orden. Cada vez que el programa encuentra una variable que no vaya seguida de un indica- 
dor exph'cito de tipo (! % $), el ordenador considera que es del tipo implicito. Esta orden 
hace que el tipo implicito sea 'variable real'. La orden afecta a todas las variables cuyos 
nombres empiecen por la letra o letras especificadas. Se puede especificar una lista: 

DEFREAL a, b,c 

o bien un margen de iniciales: 

DEFREAL a-z 
Palabras clave asociadas: DEFINT, DEFSTR. 
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DEFSTR 

DEFSTR {lista de: {margen de letras) 

10 DEFSTR n 

20 nombre = "Amstrad" 

30 PRINT nombre 

run 

Amstrad 

Orden. Cada vez que el programa encuentra una variable que no vaya seguida de un indica- 
dor exph'cito de tipo (! % $), el ordenador considera que es del tipo implicito. Esta orden 
hace que el tipo implicito sea 'variable literal'. La orden afecta a todas las variables cuyos 
nombres empiecen por la letra o letras especificadas. Se puede especificar una lista: 

DEFSTR a,b,c 

o bien un margen de initiates: 

DEFSTR a-z 
Palabras clave asociadas: DEFINT, DEFREAL. 

DEG 

DEG 

DEG 

Orden. Hace que BASIC considere que los valores de los arcos que intervienen en los calcu- 
los trigonometricos estan expresados en grados, no en radianes. La situation implicita para 
las funciones SIN, COS, TAN y ATN es la inversa: radianes. DEG cambia de radianes a 
grados; las ordenes RAD, NEW, CLEAR, LOAD, RUN, etc. cambian de grados a radianes. 

Palabras clave asociadas: ATN, COS, RAD, SIN, TAN. 

DELETE 

DELETE {margen de numeros de linea) 

DELETE 100-200 

Orden. Borra la instruction o grupo de instrucciones especificado por (margen de numeros 
de linea). 
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Si se omite el primer numero de <margen de numeros de linea>, se entiende 'desde el princi- 
pio del programa hasta . . . '; si se omite el segundo numero, se entiende ' . . . hasta el final 
del programa'. Asi, 

DELETE -200 

borra las primeras lineas del programa, hasta la 200 inclusive. En cambio, 

DELETE 50- 
borra desde la linea 50 en adelante. Finalmente, 

DELETE 

borra el programa completo. 

Palabras clave asociadas: CHAIN, MERGE, NEW, RENUM. 



DI 

Dl 

10 CLS:TAG:EVERY 10 GOSUB 90 

20 X1 = RND*320:X2=RND*320 

30 Y=200+RND*200:C$ = CHR$(RND*255) 

40 FOR X=320-X1 TO 320 + X2 STEP 4 

50 Dl 

60 PLOT 320,0,1 :MOVE X-2,Y:MOVE X,Y 

70 PRINT " ";C$;:CALL &BD19 

80 EI:NEXT:GOTO 20 

90 MOVE 320,0:DRAW X+8,Y-16,0:RETURN 

run 

Orden. Inhibe interrupciones (a exception de [esc]) hasta que se las habilite explicitamente 
con El o implicitamente con el RETURN en el que termina la subrutina invocada como con- 
secuencia de la interruption. 

Notese que al entrar en una rutina de interruption se inhiben automaticamente todas las 
interrupciones de prioridad igual o inferior. 

Esta orden se utiliza para asegurar que el programa funcione sin interruption; por ejemplo, 
cuando dos rutinas estan compitiendo por el uso de recursos comunes. En el ejemplo ante- 
rior, el programa principal y la subrutina de interruption estan compitiendo por el uso de 
la pantalla grafica. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas amplia information a este 
respecto. 

Palabras clave asociadas: AFTER, El, EVERY, REMAIN. 
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DIM 

DIM {lista de: {variable indexada) 

10 CLS 

20 DIM amigo$(5),telefono$(5) 

30 FOR n = 1 TO 5 

40 PRINT "Amigo numero:";n 

50 INPUT "Nombre ";amigo$(n) 

60 INPUT "Telefono ";telefono$(n) 

70 PRINT 

80 NEXT 

90 FOR n = 1 TO 5 

100 PRINT n;amigo$(n),telefono$(n) 

110 NEXT 

run 

Orden. DIMensiona listas. DIM hace una reserva de espacio para los elementos de la lista 
y especifica cual va a ser el maximo valor del indice. BASIC requiere que se le informe del 
tarnano que debe reservar para las listas; sin embargo, permite el manejo de listas no dimen- 
sionadas (es decir, no declaradas con una orden DIM) a condition de que el indice no sobre- 
pase el valor 10. 

Una lista es una 'variable indexada', lo que quiere decir que se utiliza un solo nombre de 
variable para representar varios elementos; cada elemento esta identificado por su 'indice'. 
Las listas pueden ser controladas facilmente mediante bucles de tipo FOR ... NEXT, iden- 
tificando el indice con la variable del contador del bucle. 

Observese que el valor mfnimo del indice (esto es, el primer elemento utilizable) es el cero. 

Un vector es una lista unidimensional. Tambien se pueden utilizar listas multidimensionales 
(matrices). Por ejemplo, una lista tridimensional se dimensionaria con 

DIM posicion$(20,20,20) 

y un elemento concreto seria posicion$(4,5,6). 
Palabras clave asociadas: ERASE. 

DRAW 

DRAW (coordenada x) .{coordenada y)[,(tinta)\ 

10 MODE 0:BORDER 0:PAPER 0:INK 0,0 
20 x=RND*640:y = RND*400:z = RND*15 
30 DRAW x,y,z 
40 GOTO 20 
run 
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Orden. Dibuja en la pantalla grafica una recta que va desde la position actual del cursor 
grafico hasta el punto de coordenadas x,y especificadas. Se puede especificar el color de 
<tinta> con el que se desea dibujar la recta (margen: a 15). 

Palabras clave asociadas: DRAWR, MOVE, MOVER, ORIGIN, PLOT, PLOTR, TEST, 
TESTR, XPOS, YPOS. 



DRAWR 

DRAWR {incremento de x> .{incremento de y)[,[(tinta)][,(modo de tinta)]] 

10 CLS:PRINT "escalera" 

20 MOVE 0,350:FOR n = 1 TO 8 

30 DRAWR 50,0 

40 DRAWR 0,-50 

50 NEXT 

60 GOTO 60 

run 

Orden. Dibuja en la pantalla grafica una recta que va desde la position actual del cursor 
grafico hasta el punto especificado en coordenadas relativas por < incremento de x> e < in- 
cremento de y>. Se puede especificar el color de <tinta> con el que se desea dibujar (mar- 
gen: a 15). 

Palabras clave asociadas: DRAW, MOVE, MOVER, ORIGIN, PLOT, PLOTR, TEST, 
TESTR, XPOS, YPOS. 

EDIT 

EDIT (numero de linea) 

EDIT 20 

Orden. Escribe en la pantalla la linea especificada por <niimero de linea) y la deja dispuesta 
para ser editada, con el cursor sobre ella. 

Palabras clave asociadas: LIST. 

EI 

El 

El 

Orden. Habilita interrupciones que hayan sido inhibidas previamente con Dl. 
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Si se inhiben las interrupciones en una subrutina de interruption, BASIC las habilita cuan- 
do encuentra el RETURN del final de la subrutina. 

En la parte 2 del capi'tulo titulado 'Cuando usted guste . . . ' daremos mas amplia informa- 
tion acerca de las interrupciones. 

Palabras clave asociadas: AFTER, Dl, EVERY, REMAIN. 



ELSE 

(Vease IF.) 

END 

END 

END 

Orden. Termina la ejecucion del programa y devuelve el ordenador al modo directo. En 
un mismo programa se pueden incluir varias ordenes END; se supone un END implicito 
despues de la ultima linea del programa. 

Palabras clave asociadas: STOP. 



ENT 

ENT (numero de envo/vente}[, (section de envo/vente}][, (section de envolvente)] 

[.(section de envo/vente)][, {section de envo/vente}][, (section de envo/vente)] 

10 ENT 1,10,-50,10,10,50,10 
20 SOUND 1,500,200,10„1 
run 

Orden. Define las caracteristicas de la envolvente de tono especificada por < numero de 
envolvente) (margen: de 1 a 15) y citada como <envolvente de tono) en la orden SOUND. 
Si el < numero de envolvente) es negativo (margen de - 1 a - 15), la envolvente se repite 
hasta el final de la (duration) especificada en la orden SOUND. 

Cada < seccion de envolvente) puede constar de 2 o 3 parametros. 

Si se utilizan 3 parametros, tienen el significado siguiente: 

(numero de escalones) .(altura de cada escalon) .(tiempo de pausa) 
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Parametro 1: (numero de escalones) 

Este parametro especifica en cuantas etapas queremos que la nota evolucione a lo largo de 
la duracion de la section de la envolvente. Por ejemplo, si una section de la nota ha de du- 
rar 10 segundos, se la puede dividir en 10 etapas de 1 segundo cada una; en tal caso, el para- 
metro (numero de escalones) tendra que ser 10. 

El margen de este parametro es de a 239. 

Parametro 2: <altura de cada escalon) 

En cada etapa, el tono puede variar con respecto al de la anterior en un numero de unidades 
comprendido entre - 128 y +127. Las variaciones negativas representan aumentos del tono 
(tono mas agudo); las variaciones positivas reducen el tono (tono mas grave). El valor mini- 
mo del periodo de tono es 0. En el capftulo 'Para su referencia . . . ' se da la lista completa 
de los periodos de tono. 

Parametro 3: <tiempo de pausa) 

Este parametro especifica la duracion de cada escalon (intervalo entre cada dos saltos) en 
unidades de centesimas de segundo. El margen de valores es de a 255; esto significa que 
la duracion maxima de cada escalon es de 2.56 segundos (el se considera como 256). 

Si se utilizan 2 parametros, su significado es el siguiente: 
{periodo de tono) .{tiempo de pausa) 

Parametro 1: (periodo de tono) 

Este parametro da un nuevo valor absoluto del periodo de tono. (Vease el parametro 2 de 
la orden SOUND.) 

Parametro 2: (tiempo de pausa) 

Este parametro especifica la duracion de escalon en unidades de centesimas de segundo. El 
margen de valores es de a 255, es decir, el valor maximo es 2.56 segundos, ya que el 
se considera como 256. 

General 

La suma de todos los (tiempos de pausa) no debe ser mayor que el parametro (duracion) 
de la orden SOUND; de lo contrario, el sonido habra concluido antes de que se hayan com- 
pletado todas las etapas de la envolvente. (En tal caso, el ordenador ignora el resto del con- 
tenido de la envolvente.) 

Analogamente, si la duracion especificada en SOUND es mayor que la impuesta por la su- 
ma de todos los (tiempos de pausa), la nota continuara sonando aunque se hayan termina- 
do los escalones de la envolvente de tono, y lo hara con el tono correspondiente al de la 
ultima etapa de la envolvente. 
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En una orden EIMT se puede definir un maximo de 5 <secciones de envolvente) (cada una 
de las cuales puede constar de 2 o 3 parametros). 

La primera etapa de una envolvente de tono se ejecuta inmediatamente. 

Cada vez que se define una envolvente de tono, se anula la definition anterior. 

Si se define un < numero de envolvente) sin especificar parametros para ninguna de sus sec- 
ciones, se anula la definition anterior. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas information sobre las en- 
volventes de tono. 

Palabras clave asociadas: ENV, SOUND. 



ENV 

ENV {numero de envolvente)[, {section de envo/vente)][, {section de envolvente)] 

[.{section de envolvente)][, {section de envo/vente)][, {section de envolvente)] 

10 ENV 1,15,-1,10,15,1,10 
20 SOUND 1,200,300,15,1 
run 

Orden. Define las caracteristicas de la envolvente de volumen especificada por < numero de 
envolvente) (margen: de 1 a 15) y citada como < envolvente de volumen) en la orden 
SOUND. 

Cada < seccion de envolvente) puede constar de 2 o 3 parametros. 

Si se utilizan 3 parametros, tienen el significado siguiente: 

{numero de escalones) .{altura de cada escalon) .{tiempo de pausa) 

Parametro 1: < numero de escalones) 

Este parametro especifica en cuantas etapas queremos que la nota evolucione antes de com- 
pletar la seccion de la envolvente. Por ejemplo, si una seccion de la nota ha de durar 10 
segundos, se la puede dividir en 10 etapas de 1 segundo cada una; en tal caso, el parametro 
< numero de escalones) sera 10. 

El margen de este parametro es de a 127. 

Parametro 2: < altura de cada escalon) 

En cada etapa, el volumen puede variar con respecto al nivel anterior en un numero de uni- 
dades comprendido entre y 15. Estos 16 niveles de sonido son los mismos que se definen 
en la instruction SOUND. Sin embargo, el margen del parametro <altura de cada escalon) 
es de -128 a +127; el nivel del volumen vuelve a cada vez que sobrepasa el 15. 
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Parametro 3: <tiempo de pausa) 

Este parametro especifica la duracion de cada escalon en unidades de centesimas de segun- 
do. El margen de valores es de a 255; esto significa que la duracion maxima de cada esca- 
lon es de 2.56 segundos (el se considera como 256). 

Si se utilizan 2 parametros, su significado es el siguiente: 
{envolvente de hardware) .{periodo de envolvente) 

Parametro 1: < envolvente de hardware) 

Este parametro especifica el valor que se debe enviar al registro de forma de envolventes 
del generador de sonido. 

Parametro 2: < periodo de envolvente) 

Este parametro especifica el valor que se debe enviar a los registros de periodo de envolven- 
tes del generador de sonido. 

Para utilizar las envolventes de hardware es necesario que el usuario conozca el funciona- 
miento interno del generador de sonido. De no ser asi, le recomendamos que utilice las en- 
volventes definidas por programa, incorporado un <tiempo de pausa) adecuado. 

General 

La suma de todos los <tiempos de pausa) no debe ser mayor que el parametro < duracion) 
de la orden SOUND; de lo contrario, el sonido habra concluido antes de que se hayan com- 
pletado todas las etapas de la envolvente. (En tal caso, el ordenador ignora el resto del con- 
tenido de la envolvente.) 

Analogamente, si la duracion especificada en SOUND es mayor que la impuesta por la su- 
ma de todos los <tiempos de pausa), la nota continuara sonando aunque se hayan termina- 
do los escalones de la envolvente de tono, y lo hara con nivel de volumen igual al de la ulti- 
ma etapa de la envolvente. 

En una orden ENV se puede definir un maximo de 5 <secciones de envolvente) (cada una 
de las cuales puede constar de 2 o 3 parametros). 

La primera etapa de una envolvente de volumen se ejecuta inmediatamente. 

Cada vez que se define una envolvente de volumen, se anula la definicion anterior. 

Si se define un <numero de envolvente) sin especificar parametros para ninguna de sus sec- 
ciones, se anula la definicion anterior. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas information sobre las en- 
volventes de volumen. 

Palabras clave asociadas: ENT, SOUND. 
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EOF 

EOF 

10 OPENIN "ejemplo" 

20 WHILE NOT EOF 

30 LINE INPUT #9,a$ 

40 PRINT a$ 

50 WEND 

60 CLOSEIN 

run 

Funcion. Comprueba si se ha alcanzado el final del fichero (End of File). Da el valor - 1 
(verdadero) si no hay ningiin fichero abierto o si se ha alcanzado el final del fichero; da 
(falso) en caso contrario. 

Palabras clave asociadas: OPENIN, CLOSEIN. 



ERASE 

ERASE {lista de:(nombre de variable) 

DIM a(100).b$(100) 
ERASE a,b$ 

Orden. Borra el contenido de una o varias listas y libera el espacio de memoria ocupado 
por ellas. 

Palabras clave asociadas: DIM. 



ERL 

ERL 

10 ON ERROR GOTO 30 

20 GOTO 1000 

30 PRINT "Error en la linea";ERL 

40 END 

run 

Funcion. Da el niimero de la linea en la que se ha detectado el ultimo error. En el programa 
ejemplo, el error esta en la linea 20, y este es el niimero generado por ERL en la linea 30. 

Palabras clave asociadas: ERR, ERROR, ON ERROR GOTO, RESUME. 
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ERR 

ERR 

GOTO 500 
Line does not exist 
Ready 
PRINT ERR 
8 

Funcion. Da el numero del ultimo error detectado. En el capi'tulo titulado 'Para su 
referencia . . . ' se da la lista de los mensajes de error. El programa ejempo muestra que el 
error numero 8 es 'Line does not exist' ("no existe esa linea"). 

Palabras clave asociadas: ERL, ERROR, ON ERROR GOTO, RESUME. 



ERROR 

ERROR {expresion entera) 

10 IF INKEY$ = " " THEN 10 ELSE ERROR 17 
run 

Orden. Invoca el error de numero especificado por < expresion entera). En el capitulo 'Para 
su referencia . . .' se da la lista de los mensajes de error 1 a 32. BASIC trata el ERROR 
como si efectivamente lo hubiera detectado: salta a la rutina de gestion de errores (si la hay) 
y genera los valores correctos de ERR y ERL. 

La orden ERROR seguida de una < expresion entera) cuyo valor este entre 33 y 255 sirve 
para crear mensajes de error a medida de las necesidades del programador, como ilustra 
el siguiente ejemplo: 

10 ON ERROR GOTO 100 

20 INPUT "Escriba una letra ";a$ 

30 IF LEN(A$)<>1 THEN ERROR 100 

40 GOTO 20 

100 IF ERR = 100 THEN 110 ELSE 130 

110 PRINT CHR$(7) 

120 PRINT "Le dije que UNA letra!" 

130 RESUME 20 

run 

Palabras clave asociadas: ERL, ERR, ON ERROR GOTO, RESUME. 
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EVERY 

EVERY (periodo de tiempo)[. (numero de temporizador)] GOSUB (numero de linea) 

10 EVERY 50,1 GOSUB 30 

20 GOTO 20 

30 SOUND 1,20 

40 RETURN 

run 

Orden. Invoca una subrutina de BASIC a intervalos de tiempo regulares. El (periodo de 
tiempo) especifica el intervalo en unidades de 0.02 s (cintuentavos de segundo). 

El < numero del temporizador) (margen de a 3) especifica cual de los cuatro cronometros 
se debe utilizar. El temporizador numero 3 tiene la prioridad mas alta; el numero (que 
es el implicito), la mas baja. 

Cada uno de los cuatro cronometros puede tener una subrutina asociada. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas amplia information acer- 
ca de las interrupciones. 

Palabras clave asociadas: AFTER, REMAIN. 

EXP 

EXP{(expresidn numerica)) 

PRINT EXP(6.876) 
968.743625 

Funcion. Calcula el numero e elevado a la potencia dada por <expresion numerica). El nu- 
mero e es la base de los logaritmos neperianos, aproximadamente igual a 2.7182818. 

Palabras clave asociadas: LOG. 



FIX 

F I X ( < expresion n umerica ) ) 

PRINT FIX(9.99999) 
9 

Funcion. Da la parte entera de la (expresion numerica), ignorando su parte decimal. 
Palabras clave asociadas: CINT, INT, ROUND. 
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FN 

Vease DEF FN. 

FOR 

FOR {variable sencilla) = (principio) TO {fin} [STEP (sa/to)] 

10 FOR n = 2T0 8 STEP 2 

20 PRINT n; 

30 NEXT n 

40 PRINT ", y ocho dieciseis" 

run 

Orden. Ejecuta el grupo de instrucciones comprendidas entre FOR y NEXT un numero da- 
do de veces, incrementando el valor de la variable de control (variable del contador) en un 
numero especificado por <salto> desde <principio> hasta <fin>. Si no se especifica ningiin 
valor de <salto> para STEP, se supone el 1. 

El <salto> puede ser una <expresion numerica). Si su valor es negativo, el parametro 
<principio> tiene que ser mayor que el parametro <fin>, pues de no ser asi la variable del 
contador no sera modificada. 

Los bucles FOR . . . NEXT pueden ser 'anidados', es decir, programados uno dentro de 
otro. 

No es necesario especificar el nombre de la variable a continuation de NEXT, ya que 
BASIC determina automaticamente a que FOR corresponde cada NEXT 'anonimo'. 

Palabras clave asociadas: NEXT, STEP, TO, WHILE. 



FRE 

FRE{(.expresi6n numerica)) 
FRE{(.expresi6n literal)) 

PRINT FRE(O) 
PRINT FREC") 

Funcion. Da el espacio libre de memoria utilizable por BASIC. En la forma FRE ("") reali- 
za una 'limpieza de memoria' antes de dar el numero de bytes libres. 

Palabras clave asociadas: HIMEM, MEMORY. 
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GOSUB 

GOSUB {numero de linea) 
GOSUB 210 



Orden. Invoca una subrutina de BASIC; es decir, reconduce el programa hacia el < numero 
de linea) especificado. El final de la subrutina estara indicado por la orden RETURN; 
cuando se llega a ella, el programa retorna a la instruction siguiente al GOSUB que invoco 
la subrutina. 

Palabras clave asociadas: RETURN. 



GOTO 

GOTO (numero de linea) 
GOTO 90 

Orden. Hace que la ejecucion del programa sake a la linea especificada. 

HEX$ 

HEX$(< expresion entera)\,(anchura del campo)]) 

PRINT HEX$(255,4) 
00FF 

Funcion. Produce una cadena literal que es la version hexadecimal de la < expresion 
entera). La longitud de la cadena es la especificada por el parametro <anchura del campo) 
(margen de a 16). Si la longitud es demasiado pequena, la cadena resultante no se trunca, 
sino que consta de todos los caracteres necesarios. 

El valor de la < expresion entera) tiene que estar comprendido entre -32768 y +65535. 

Palabras clave asociadas: BIN$, STR$, UNT. 

HIMEM 

HIMEM 

PRINT HIMEM 
43903 
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Funcion. Da la direction de la position de memoria mas alta accesible a BASIC (la cual 
puede ser modificada con la orden MEMORY). 

Palabras clave asociadas: FRE, MEMORY, SYMBOL, SYMBOL AFTER. 



IF 

IF (expresion logica) THEN (option) [ELSE (option)] 

10 MODE 1 

20 x=CINT(RND*100) 

30 PRINT "Adivine mi numero (de a 100)" 

40 INPUT n 

50 IF n<x THEN PRINT n;"es demasiado bajo ..." 

60 IF n>x THEN PRINT n;"es demasiado alto ..." 

70 IF n = x THEN 80 ELSE c=c + 1:GOTO 40 

80 PRINT "Muy bien. Lo ha conseguido en"; 

90 PRINT c + 1;"intentos!" 

run 

Orden. Determina si la < expresion logica) tiene el valor 'verdadero'. Si es asi, ejecuta la 
primera <opci6n>. Si la < expresion logica) tiene el valor 'falso', ejecuta la < option) especi- 
ficada despues de ELSE; si no se ha incluido ELSE, BASIC pasa a la siguiente linea del 
programa. 

Las ordenes IF . . . THEN . . . se pueden anidar, sin mas limite que la longitud de la linea. 
La orden (o la serie de ordenes anidadas) termina en el final de la linea, de modo que no 
es posible poner en la misma linea instrucciones que sean independientes de la orden IF . . . 
THEN .... 

Si la < option) especificada consiste en un salto de linea, la orden puede tener cualquiera 
de las tres formas siguientes: 

IF a = 1 THEN 100 
IF a = 1 GOTO 100 
IF a = 1 THEN GOTO 100 

Palabras clave asociadas: ELSE, GOTO, THEN. 



INK 

INK (tinta) ,(color)[,(color)\ 

10 MODE 1:PAPER 0:PEN 1 
20 FOR p=0TO 1 
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30 FOR i=0 TO 26 

40 INK p.i 

50 LOCATE 16,12:PRINT "ink";p;", ";i 

60 FOR t = 1 TO 400:NEXT t,i,p 

70 INK0,1:INK 1,24:CLS 

run 

Orden. Asigna uno o dos colores a la <tinta> dada. El parametro <tinta> es el numero de 
referenda de la tinta (margen de a 15), por el que se la cita en las ordenes PEN y PAPER. 
El primer < color) debe ser una expresion entera cuyo valor este comprendido entre y 26. 
Si se incluye el segundo < color), la tinta alterna entre los dos colores, a una velocidad que 
se controla con la orden SPEED INK. 

Palabras clave asociadas: PAPER, PEN, SPEED INK. 



INKEY 

INKEY(< expresion entera)) 

10 CLS:IF INKEY{55)=32 THEN 30 ELSE 20 

20 CLS:GOTO 10 

30 PRINT "Ha pulsado [MAYS] y V" 

40 FOR t=1 TO 1000: NEXT: GOTO 10 

run 

Funcion. Examina el teclado para determinar si se ha pulsado una tecla determinada. La 
exploration se realiza una vez cada 0.02 s. 

Esta funcion es litil para averiguar si se ha pulsado cierta tecla, comprobando si el numero 
generado por INKEY es - 1 (el cual es independiente de la situation de MAYS; y [CTRL]). 

El ejemplo anterior detecta cuando se pulsa V (tecla numero 55) con [mays] y sin |ctrl] . 
El esquema de la numeration de las teclas esta grabado en la carcasa del ordenador, a la 
derecha del teclado, e impreso en el capftulo titulado 'Para su referencia . . .'. 

Los valores generados por INKEY en funcion de la situation de las teclas [mays] y [ctrl] 
son los siguientes: 



Valor generado 


[maysI 


[CTRL] 


Tecla especificada 


-1 


Indiferente 


Indiferente 


No pulsada 





No pulsada 


No pulsada 


Pulsada 


32 


Pulsada 


No pulsada 


Pulsada 


128 


No pulsada 


Pulsada 


Pulsada 


160 


Pulsada 


Pulsada 


Pulsada 



Palabras clave asociadas: INKEY$, INPUT, JOY. 
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INKEY$ 

INKEY$ 

10 CLS 

20 PRINT "Elija Si o No (S/N):" 

30 a$=INKEY$ 

40 IF a$ = "" THEN 30 

50 IF a$ = "s" OR a$="S" THEN 80 

60 IF a$ = "n" OR a$ = "N" THEN 90 

70 GOTO 30 

80 PRINT "Ha respondido SI":END 

90 PRINT "Ha respondido NO" 

run 

Funcion. Examina el teclado para determinar si se ha pulsado alguna tecla; de ser asi, gene- 
ra una cadena literal consistente en el caracter correspondiente a la tecla pulsada. Si no se 
ha pulsado ninguna tecla, genera la cadena vacia. En el programa ejemplo, las lfneas 30 
y 40 forman un buck que no deja de repetirse mientras no se pulse una tecla. 

Palabras clave asociadas: INKEY, INPUT. 

INP 

\NP[(numero de puerta)) 

PRINT INP(&FF77) 
255 

Funcion. Da el valor de entrada leido en la direction de entrada/salida especificada por el 
parametro <numero de puerta). 

Palabras clave asociadas: OUT, WAIT. 

INPUT 

INPUT [#{expresion de numero de canal) ,][;] 

[{cadena literal entre comillas) {separador)~\{lista de: {variable) 

10 MODE 1 

20 INPUT "Escriba los dos factores (separados por una coma): ",a,b 

30 PRINT a;"por";b;"es";a*b 

40 GOTO 20 

run 
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Orden. Capta una entrada de datos por el canal especificado (por el #0, si no se especifica 
ninguno). 

El primer signo de punto y coma es opcional e inhibe la funcion de retorno del carro/avance 
de linea que de otra forma se produciria al terminar de ejecutarse la instruction. 

El <separador> tiene que ser una coma o un punto y coma. El punto y coma hace que se 
escriba el signo de interrogation; la coma lo impide. 

Si el dato introducido es de tipo incorrecto (por ejemplo, cuando se escribe la letra O en 
lugar del numero en la captation de un dato numerico), BASIC responde con el mensaje: 

?Redo from start 

y cualquier otro texto que se hay a programado. 

Toda introduction de datos a traves del teclado debe terminar con la pulsation de la tecla 

JINTRO ]. 

Palabras clave asociadas: INKEY$, LINE INPUT. 



INSTR 

INSTR([<pos/c/o/7 de partida) ,]{cadena en la que se busca), (cadena buscada)) 

10 CLS:FOR n = 1 TO 26 

20 alfabeto$ = alfabeto$ + CHR$(n+64) 

30 NEXT 

40 INPUT "Escriba una letra: ",a$ 

50 b$ = UPPER$(a$) 

60 PRINT b$;" es la letra numero"; 

70 PRINT INSTR(alfabeto$,b$); 

80 PRINT "del alfabeto":PRINT 

90 GOTO 40 

run 

Funcion. Determina si la < cadena buscada) esta contenida en la < cadena en la que se 
busca). Si lo esta, da la position del caracter de la (cadena en la que se busca) en el que 
se ha producido la primera coincidencia. Si no lo esta, da el numero 0. 

El parametro opcional (position de partida) indica en que lugar de la < cadena en la que 
se busca) debe empezar la biisqueda; debe ser una expresion entera que de un valor com- 
prendido entre 1 y 255. 

Palabras clave asociadas: LEFT$, MID$, RIGHT$. 
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INT 

ll\IT(<expres/0A7 numerica)) 

PRINT INTI-1.995) 
-2 

Funcion. Redondea el valor de la (expresion numerica) al numero entero inferior, despre- 
ciando la parte decimal. Da el mismo valor que FIX cuando el argumento es positivo, pero 
una unidad menos que FIX cuando el argumento es negativo y no entero. 

Palabras clave asociadas: CINT, FIX, ROUND. 
JOY 

J O Y ( < expresion en tera > ) 

10 PRINT "Para detener el programs "; 

20 PRINT "accione el joystick" 

30 IF JOY(0)<> THEN END 

40 GOTO 10 

run 

Funcion. Lee bit a bit la situation del joystick especificado por la (expresion entera) (que 
debe valer o 1). Genera un valor decimal segun la siguiente tabla: 





Bit 


Decimal 





Arriba 


1 


1 


Abajo 


2 


2 


Izquierda 


4 


3 


Derecha 


8 


4 


Disparo 2 


16 


5 


Disparo 1 


32 



Asi, en el programa ejemplo, si el boton principal de disparo (Disparo 2) del primer joystick 
esta accionado mientras la empunadura esta inclinada hacia la izquierda, la funcion JOY(O) 
da el numero decimal 20, que es la suma de 16 (Disparo 2) mas 4 (Izquierda). 

En el capitulo 'Para su referencia . . . ' daremos mas information acerca de los joysticks. 

Palabras clave asociadas: IN KEY. 
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KEY 

KEY {codigo expansible) .{expresion literal) 

KEY 11, "border 13:paper O.pen 1:ink 0,13: 
ink 1,0:mode 2:list" + CHR$(13) 

y ahora pulse la tecla |intro| . 

Orden. Asigna la <expresion literal) al < codigo expansible) especificado. El sistema mane- 
ja 32 codigos expansibles, del al 31, identificados por los codigos de tecla 128 a 159. Los 
codigos de tecla del 128 (generado por la tecla del teclado numerico) al 140 (generado por 
la tecla [intro] con |ctrl[) tienen asignadas implicitamente las funciones de escribir los df- 
gitos del al 9, el punto, [TntroI y RUN"[Tn tro1 , respectivamente, pero se les pueden asig- 
nar otras <expresiones literales) diferentes con KEY. Los codigos expansibles 13 a 31 (codi- 
gos de tecla 141 a 159) tienen asignada implicitamente la cadena vacia, pero se los puede 
expandir con KEY para luego asignarlos a teclas concretas con KEY DEF. 

El parametro < codigo expansible) incluido en la orden KEY puede estar en el margen de 
a 31, o bien en el margen 128 a 159 para reflejar directamente codigos de tecla. (Vease 
la ilustracion del capitulo 'Para su referencia ...'.) 

Las <expresiones literales) con las que se expandan los codigos expansibles pueden ocupar 
como maximo un total de 120 caracteres. Si se intenta sobrepasar ese limite se produce el 
error 'improper argument' ('argumento inadecuado', error niimero 5). 

Palabras clave asociadas: KEY DEF. 



KEY DEF 

KEY DEF {niimero de tecla), {repetir)[,{norma/)[,{mayuscu/a)[,{contro/)]]] 

KEY 159,"esta es la tecla TAB" 
KEY DEF 68,1,159 

Despues de escribir estas ordenes, pulse la tecla [tab]. 

Orden. Define los codigos de tecla que van a ser generados por la tecla de niimero especifi- 
cado. El < niimero de tecla) tiene que estar en el margen de a 79 (veanse los niimeros de 
tecla en el diagrama grabado a la derecha del teclado, o bien el esquema del capitulo 'Para 
su referencia ...'). En la definition se pueden incluir los codigos de tecla que deben ser 
generados por la tecla cuando se la pulsa sola y cuando se la pulsa en combination con 
[ MAYS y C TRL . Todos estos parametros son opcionales. 

El parametro <repetir) puede tener los valores 1 (para que la tecla sea de repetition) o 
(para que no lo sea). La velocidad de repetition se puede definir con SPEED KEY. 
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En el ejemplo anterior, primero se asigna una cadena literal al codigo 159 (equivalente al 
codigo expansible 31), y luego se especifica que la tecla numero 68 (la tecla ]t ab| ) debe ser 
de repetition (1) y generar el codigo 159 cuando se la pulse sola. 

La situation normal se restaura, en el ejemplo anterior, mediante la orden: 
KEY DEF 68,0,9 



ya que el 9 es el codigo ASCII normalmente generado por |tab| 
Palabras clave asociadas: KEY, SPEED KEY. 



LEFTS 

LEFT${<expres/d/7 literal) .{longitud deseada)) 

10 CLS 

20 a$ = "AMSTRAD" 

30 FOR n = 1 TO 7 

40 PRINT LEFT${a$,n) 

50 NEXT 

run 

Funcion. Produce una cadena que consta del numero de caracteres dado por (longitud 
deseada) (mar gen de a 255) tornados de la izquierda de la (expresion literal). Si la longi- 
tud de la (expresion literal) es menor que la (longitud deseada), la cadena producida es 
la (expresion literal) completa. 

Palabras clave asociadas: MID$, RIGHT$. 



LEN 

LEW (expresion literal)) 

10 LINE INPUT "Escriba una frase: ",a$ 

20 PRINT "La frase tiene"; 

30 PRINT LEN(a$);"caracteres." 

run 

Funcion. Da la longitud de la (expresion literal), es decir, el numero de caracteres de que 
consta esta. 
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LET 

LET < variable > = < expresion > 

LETx = 100 

Orden. Asigna un valor a una variable. Es una reliquia de las primeras versiones de BASIC, 
innecesaria en el BASIC de AMSTRAD. En el ejemplo anterior habria bastado con 
escribir: 

x = 100 

LINE INPUT 

LINE INPUT [#<expres/o/7 de numero de canal), ][;][( cadena entre comillas) (separador)} 
{variable literal) 

10 LINE INPUT "Escriba una linea de texto: ",a$ 

20 CLS 

30 PRINT "La variable a$ es igual a: " 

40 PRINT a$ 

run 

Orden. Acepta la introduccion de una linea entera de texto por el canal especificado (o por 
el #0, si no se especifica ninguno). El primer signo de punto y coma es opcional y, si se 
lo incluye, inhibe el retorno del carro/avance de linea que de otra forma se realizaria al ter- 
minar de ejecutarse la orden. 

El <separador> tiene que ser una coma o un punto y coma. El punto y coma hace que se 
escriba el signo de interrogation; la coma lo impide. 

La captacion de datos a traves del teclado debe terminar con la pulsation de la tecla 

llNTROl. 



La captacion de datos por el canal #9 (cinta) termina cuando se recibe un caracter de retor- 
no del carro o cuando se han recibido 255 caracteres (lo que antes ocurra). 

Palabras clave asociadas: INPUT. 
LIST 

LIST [{margen de numeros de l/nea)][,tt (expresion de numero de canal)] 
LIST 100-1000,#1 

Orden. Envia el listado de las lineas especificadas al canal especificado. El canal implicito 
es el #0. La impresora es el canal #8. La action de listar se puede suspender momentanea- 
mente pulsando |ESC| una vez, tras lo cual se la puede reanudar pulsando la barra espacia- 
dora o abandonar definitivamente pulsando [esc] por segunda vez. 
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Si se omite el primer numero de < mar gen de numeros de linea>, se entiende 'desde el princi- 
pio del programa hasta . . . '; si se omite el segundo numero, se entiende ' . . . hasta el final 
del programa'. Asi, 

LIST -200 

lista las primeras lineas del programa, hasta la 200 inclusive. En cambio, 

LIST 50- 
lista desde la lfnea 50 en adelante. Finalmente, 

LIST 
lista el programa completo. 

LOAD 

LOAD {nombre de fichero)\.,{expresion de direction de memoria)] 

LOAD "fichero",&2AF8 

Orden. Lee un programa de BASIC grabado en cinta y lo carga en la memoria, reemplazan- 
do al actual. Si se especifica la <expresion de direccion de memoria) opcional, LOAD carga 
un fichero binario en esa direccion, en lugar de hacerlo en la direccion a partir de la cual 
se lo grabo. 

Si no se especifica nombre de fichero, BASIC intenta cargar el primer fichero valido que 
encuentra en la cinta. Si el primer caracter del nombre es !, BASIC suprime tanto este carac- 
ter como todos los mensajes que de otra forma generaria el sistema de cinta. 

Los programas de BASIC protegidos no se pueden cargar por este metodo, pues el ordena- 
dor los borra inmediatamente de la memoria. Esos programas deben ser cargados con RUN 
o CHAIN. 

Palabras clave asociadas: CHAIN, CHAIN MERGE, MERGE, RUN, SAVE. 

LOCATE 

LOCATE [# {expresion de numero de canal) ,\{coordenada x) .(coordenada y) 

10 MODE 1 

20 FOR n = 1 TO 20 

30 LOCATE n,n 

40 PRINT CHR$(143);"posicion"; 

50 PRINT n;",";n 

60 NEXT 

run 
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Orden. Coloca el cursor de texto del canal indicado en la position especificada por las coor- 
denadas x,y. La position 1,1 es el extremo superior izquierdo de la ventana. El canal #0 
es el canal implfcito. 

Palabras clave asociadas: WINDOW. 



LOG 

LOG(<expres/d/7 numerica)) 

PRINT LOGI9999) 
9.21024037 

Funcion. Calcula el logaritmo natural o neperiano de la <expresion numerica), la cual debe 
ser mayor que cero. 

Palabras clave asociadas: EXP, LOG10. 

LOG10 

LOG 10( < expresion numerica > ) 

PRINT LOG10I9999) 
3.99995657 

Funcion. Calcula el logaritmo decimal de la < expresion numerica), la cual debe ser mayor 
que cero. 

Palabras clave asociadas: EXP, LOG. 
LOWERS 

LOWER$(<expres/d/7 literal)) 

10 a$= "OBSERVE COMO SE CONVIERTEN LAS LETRAS A " 

20 PRINT LOWER$(a$+ "MINUSCULAS") 

run 

Funcion. Da una cadena literal que es copia de la < expresion literal) especificada, pero con- 
virtiendo las letras mayiisculas en miniisculas y dejando inalterados los restantes caracteres. 
Esta funcion es litil en el proceso de datos que puedan contener miniisculas mezcladas con 
mayiisculas. 

Palabras clave asociadas: UPPER$. 
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MAX 

MAX(<//sfa de:{expresion numerica)) 

10 n = 66 

20 PRINT MAX(1,n,3,6,4,3) 
run 
66 

Funcion. Da el valor maximo de los incluidos en la <lista de:<expresion numerica). 
Palabras clave asociadas: MIN. 

MEMORY 

MEMORY (expresion de direction de memoria) 

MEMORY &20AA 

Orden. Determina el espacio de memoria utilizable por BASIC al fijar la direction de su 
h'mite superior. 

Palabras clave asociadas: FRE, HIMEM, SYMBOL, SYMBOL AFTER. 

MERGE 

MERGE {nombre del fichero) 

MERGE "nuevoprograma" 

Orden. Lee un programa grabado en disco y lo superpone al actualmente almacenado en 
la memoria. 

Las lineas del programa leido se superponen y sustituyen a las que hubiera en el antiguo 
con el mismo numero. 

Si no se especifica nombre de fichero, BASIC intenta cargar el primer fichero valido que 
encuentra en la cinta. Si el primer caracter del nombre es !, BASIC suprime tanto este carac- 
ter como todos los mensajes que de otra forma generaria el sistema de lectura de la cinta. 

MERGE descarta los valores actuales de las variables y las funciones definidas por el usua- 
rio y abandona los ficheros que esten abiertos. Ademas, desactiva la interception de errores 
que pueda haber sido activada con ON ERROR GOTO, ejecuta implfcitamente una orden 
RESTORE, reinicializa todas las caracteristicas establecidas con DEFINT, DEFREAL y 
DEFSTR y abandona las instrucciones FOR, WHILE y GOSUB que esten activas. 

Los ficheros protegidos (grabados con ,p) no pueden ser mezclados por este procedimiento 
con el programa actual. 

Palabras clave asociadas: CHAIN, CHAIN MERGE, LOAD. 
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MID$ 

M\D$[(expresi6n literal), (posicion de partida)[,(/ongitud de la subcadena)]) 

10 MODE 1:ZONE 3 

20 a$ = "MASSACHUSETTS" 

30 PRINT "Deletreame ";a$ 

40 PRINT "Vale . . . ":PRINT 

50 FOR n=1 TO LEN(a$) 

60 PRINT MID$(a$,n,1), 

70 FOR t=1 TO 700:NEXT t,n 

80 PRINT:PRINT 

90 INPUT "Ahora escriba usted otra palabra: ",a$ 

100 GOTO 50 

run 

Funcidn. Genera una cadena literal copiada de la < expresion literal). El niimero de caracte- 
res copiados es el dado por <longitud de la subcadena); la copia empieza en el caracter es- 
pecificado por {position de partida). Si no se especifica la <longitud de la subcadena), se 
copian todos los caracteres restantes, desde {position de partida) hacia la derecha. 

Si la {position de partida) es mayor que la longitud de la < expresion literal), se genera la 
cadena vacia. El margen de {position de partida) es de 1 a 255. El de <longitud de la 
subcadena) es de a 255. 

Palabras clave asociadas: LEFT$, RIGHT$. 



MID$ 

MlD$[(variab/e literal}, (posicion de insercion)[, (longitud de cadena nueva)]) 

= (expresion de cadena nueva) 

10 a$="Amstrad" 

20 MID$(a$,3,2)="XX" 

30 PRINT a$ 

run 

AmXXrad 

Orden. Reemplaza un niimero de caracteres de la {variable literal), dado por <longitud de 
cadena nueva), con caracteres tornados de < expresion de cadena nueva). La sustitucion 
empieza en {position de insertion). 

Observese que cuando se utiliza MID$ como orden, su argumento debe ser una {variable 
literal); no vale, pues, una cadena literal constante tal como "hola". 

Palabras clave asociadas: LEFT$, RIGHT$. 
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MIN 

MIN( {lista de:{expresion numerica)) 

PRINT MIN(3,6,2.999,8,9) 
2.999 

Funcion. Da el valor minimo de los incluidos en la <lista de:<expresion numerica). 
Palabras clave asociadas: MAX. 



MOD 

{argumento) MOD {argumento) 

PRINT 10 MOD 3 

1 
PRINT 10 MOD 5 



Operador. Da el resto de la division entera del primer < argumento) por el segundo. 



MODE 

MODE {expresion entera) 

10 m = m + 1:IF m>2THEN m=0 

20 MODE m 

30 PRINT'Este es el modo";m 

40 PRINT'Pulse una tecla." 

50 IF INKEY$ = "" THEN 50 ELSE 10 

run 

Orden. Cambia el modo de pantalla (0, 1 o 2) y la borra tinendola con la tinta numero 
(que puede no ser la tinta actualmente asignada al papel). Todas las pantallas de texto y 
graficas se restauran (coincidentes con la pantalla completa); los cursores de texto y grafico 
quedan en sus origenes respectivos. 

Palabras clave asociadas: ORIGIN, WINDOW. 
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MOVE 

MOVE {coordenada x> .{coordenada y) 

10 MODE 1:TAG 

20 x=RND*800-100:y=RND*430 

30 MOVE x,y 

40 PRINT "Estoy aqui"; 

50 GOTO 20 

run 

Orden. Lleva el cursor grafico a la position absoluta especificada por las coordenadas x,y. 

Palabras clave asociadas: DRAW, DRAWR, MOVER, ORIGIN, PLOT, PLOTR, TEST, 
TESTR, XPOS, YPOS. 

MOVER 

MOVER {incremento de x> .{incremento de y) 

10 MODE 1:TAG:MOVE 0,16 

20 PRINT "primero se sube"; 

30 FOR n = 1 TO 8 

40 MOVER -56,16 

50 PRINT "sube";:NEXT:PRINT " y luego se baja"; 

60 FOR n = 1 TO 8 

70 MOVER -56,-16 

80 PRINT "baja";:NEXT 

run 

Orden. Lleva el cursor grafico a un punto cuya position, referida a la actual, viene dada 
por < incremento de x>e < incremento de y>. 

Palabras clave asociadas: DRAW, DRAWR, MOVE, ORIGIN, PLOT, PLOTR, TEST, 
TESTR, XPOS, YPOS. 

NEW 

NEW 

NEW 

Orden. Borra el programa de BASIC actualmente residente en la memoria. No se pierden 
las definiciones de teclas ni se modifican las caracteristicas de la pantalla (MODE, PEN, 
PAPER, INK, etc.) ni se borra la pantalla. 
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NEXT 

NEXT [(lista de: (variable)} 

10 FOR a = 1 TO 3 

20 FOR b = TO 26 

30 MODE 1 

40 PEN a:BORDER b 

50 PRINT "pen";a;" border";b 

60 FOR c = 1 TO 500 

70 NEXT c,b,a 

run 

Orden. Senala el final del bucle FOR . . . NEXT. La orden NEXT puede ser anonima o men- 
cionar el nombre de la variable del FOR correspondiente. Observese en el ejemplo anterior 
que las variables de la lista deben estar en orden inverso al de sus correspondientes ordenes 
FOR, de modo que los bucles no queden solapados, sino anidados. 

Palabras clave asociadas: FOR, STEP, TO. 



NOT 

NOT (argumento) 

IF NOT "juan"<"pepe" THEN PRINT "verdadero" ELSE PRINT "falso" 

falso 

IF NOT "gato")"perro" THEN PRINT "verdadero" ELSE PRINT "falso" 

verdadero 

PRINT NOT -1 


PRINT NOT 
-1 

Operador. Realiza la negation logica sobre enteros inviertiendo todos los bits del argu- 
mento. 

En la parte 2 del capitulo 'Cuando usted guste ...' daremos mas amplia information sobre 
las operaciones logicas. 

Palabras clave asociadas: AND, OR, XOR. 
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ON BREAK GOSUB 

ON BREAK GOSUB {numero de tinea) 

10 ON BREAK GOSUB 40 

20 PRINT "Programs funcionando" 

30 GOTO 20 

40 CLS:PRINT "Pulsando dos veces [ESC] "; 

50 PRINT" se invoca la subrutina" 

60 FOR t = 1 TO 2000:NEXT 

70 RETURN 

run 

Orden. Provoca el salto a la subrutina especificada por < numero de lfnea) cuando se pulsa 
dos veces la tecla I esc | . 

Palabras clave asociadas: ON BREAK STOP, RETURN. 



ON BREAK STOP 

ON BREAK STOP {numero de tinea) 

10 ON BREAK GOSUB 40 

20 PRINT "Programa funcionando" 

30 GOTO 20 

40 CLS:PRINT "Pulsando dos veces [ESC] "; 

50 PRINT" se invoca la subrutina" 

60 FOR t = 1 TO 2000: NEXT 

65 ON BREAK STOP 

70 RETURN 

run 

Orden. Anula la orden ON BREAK GOSUB, permitiendo asf que el programa pueda ser 
interrumpido normalmente con la tecla [esc] . En el programa ejemplo, la orden ON 
BREAK GOSUB solo actiia una vez, pues la linea 65 de la rutina de interruption la anula. 

Palabras clave asociadas: ON BREAK GOSUB. 
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ON ERROR GOTO 

ON ERROR GOTO (numero de linea) 

10 ON ERROR GOTO 60 

20 CLS:PRINT "Si detecto un error, "; 

30 PRINT "listare el programs" 

40 FOR t = 1 TO 4000:NEXT 

50 GOTO 100 

60 PRINT "Hay un error en la linea"; 

70 PRINT ERL:PRINT:LIST 

run 

Orden. Provoca el salto a la linea especificada cuando se detecta un error en el programa. 

La forma ON ERROR GOTO desactiva la gestion de errores programada por el usuario 
y activa la normal de BASIC. 

Vease tambien la orden RESUME. 

Palabras clave asociadas: ERL, ERR, ERROR, RESUME. 

ON <expresion> GOSUB 

ON {selector) GOSUB {lista de:(numero de linea) 

10 PAPER 0:PEN 1:INK 0,1 

20 CLS:PRINT "MENU DE OPCIONES":PRINT 

30 PRINT "1. Cambiar borde":PRINT 

40 PRINT "2. Cambiar pluma":PRINT 

50 PRINT "3. Cambiar modo":PRINT 

60 INPUT "Elija del 1 al 3: ",x 

70 ON x GOSUB 90,110,130 

80 GOTO 20 

90 b = b-1:IF b<0 THEN b=26 

100 BORDER b:RETURN 

110 p = p-1:IF p<2 THEN p=26 

120 INK 1,p:RETURN 

130 m = m-1:IF m<0 THEN m=2 

140 MODE m:RETURN 

run 

Orden. Determina, en funcion del valor de < selector), que subrutina de BASIC debe ser 
invocada. El margen de valores de <selector> es de a 255. La rutina elegida es la que se 
encuentra en la lista en el lugar indicado por <selector>. Asi, en el ejemplo anterior, si x= 1, 
se invoca la rutina de la linea 90; si x=2, la linea 110; y si x=3, la de la linea 130. 
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Si el valor de (selector) es cero o mayor que el niimero de lineas citadas en la <lista de nu- 
meros de linea), no se invoca ninguna subrutina. 

Palabras clave asociadas: RETURN. 



ON <expresion> GOTO 

ON {selector) GOTO {lista de:(numero de linea) 

10 CLS:PRINT "MENU DE OPCIONES":PRINT 

20 PRINT "1. Listar programa":PRINT 

30 PRINT "2. Ampliar programa":PRINT 

40 PRINT "3. Catalogo de la cinta":PRINT 

50 INPUT "Elija del 1 al 3: ",x 

60 ON x GOTO 80,90,100 

70 GOTO 10 

80 LIST 

90 AUTO 110 

100 CAT 

run 

Orden. Determina, en funcion del valor de (selector), a que linea del programa debe saltar 
la ejecucion. El margen de valores de (selector) es de a 255. La linea elegida es la que 
se encuentra en la lista en el lugar indicado por (selector). Asi, en el ejemplo anterior, si 
x=l se salta a la linea 80; si x = 2, a la linea 90; y si x = 3, a la b'nea 100. 

Si el valor de (selector) es cero o mayor que el niimero de lineas citadas en la (lista de mi- 
meros de linea), no se produce el salto. 

Palabras clave asociadas: RETURN. 



ON SQ GOSUB 

ON SCH(canal)) GOSUB (numero de linea) 

10 ENV 1,15,-1,1 

20 ON SQ(1) GOSUB 70 

30 MODE 

40 FOR x=1 TO 13:CALL &BD19 

50 PLOT 0,0,x:DRAW 640,400:PLOT 640,0:DRAW 0,400 

60 NEXT: GOTO 40 

70 READ s:IF s=0 THEN RESTORE:GOTO 70 

80 SOUND 1,s,25,15,1 

90 ON SQ(1) GOSUB 70:RETURN 

100 DATA 50,60,90,100,35,200,24,500,0 

run 
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Orden. Invoca la subrutina especificada cuando hay espacio libre en la cola de sonidos. El 
parametro < canal) deber ser una expresion entera que de uno de los siguientes valores: 

1 para el canal A 

2 para el canal B 
4 para el canal C 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas information sobre los 
sonidos. 

Palabras clave asociadas: RETURN, SOUND, SQ. 

OPENIN 

OPENIN {nombre de fichero) 

10 REM abrir un fichero de cinta para entrada 

20 OPENIN "!datos":INPUT #9,a,a$ 

30 CLOSEIN:PRINT "Los dos vaiores son:" 

40 PRINT:PRINT a,a$ 

run 

Orden. Abre, en direccion de entrada, un fichero grabado en cinta para hacerlo accesible 
al programa. El fichero tiene que ser de tipo ASCII. 

Si el primer caracter del nombre del fichero es !, BASIC suprime tanto este caracter como 
todos los mensajes que de otra forma generarfa el sistema de cinta. 

El programa anterior solo funciona si se ha creado previamente el fichero (por ejemplo, 
con el programa siguiente). 

Palabras clave asociadas: CLOSEIN, EOF. 

OPENOUT 

OPENOUT {nombre de fichero) 

10 REM abrir un fichero en la cinta para salida 

20 INPUT "Escriba un numero: ",a 

30 INPUT "Escriba una palabra: ",a$ 

40 OPENOUT "Idatos" 

50 WRITE #9,a,a$ 

60 CLOSEOUT:PRINT "Datos grabados en cinta" 

run 

Orden. Abre, en direccion de salida, un fichero para su grabacion en cinta. 

Si el primer caracter del nombre del fichero es ! , BASIC suprime tanto este caracter como 
todos los mensajes que de otra forma generaria el sistema de cinta. 

Palabras clave asociadas: CLOSEOUT. 
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OR 

(argumento) OR (argumento) 

IF "juan"<"pepe" OR "perro">"gato" THEN PRINT "verdadero" ELSE PRINT "falso" 

verdadero 

IF "pepe"<"juan" OR "gato")"perro" THEN PRINT "verdadero" ELSE PRINT "falso" 

falso 

IF "juan"<"pepe" OR "gato">"perro" THEN PRINT "verdadero" ELSE PRINT "falso" 

verdadero 

PRINT 1 OR 1 

1 
PRINT OR 


PRINT 1 OR 

1 

Operador. Realiza la operation logica 'o' bit a bit entre enteros. El resultado es 1 a menos 
que ambos bits sean 0. 

Para mas amplia information sobre operaciones logicas, consulte la parte 2 del capitulo ti- 
tulado 'Cuando usted guste . . . '. 

Palabras clave asociadas: AND, NOT, XOR. 



ORIGIN 

ORIGIN <x> ,(y)\.,(izquierda) .(derecha) .(arriba) ,{abajo)\ 

10 CLS:BORDER 13 

20 ORIGIN 0,0,50.590,350,50 

30 DRAW 540,350 

40 GOTO 20 

Orden. Traslada el origen de graficos (nuevo punto 0,0) a la position especificada por <x> 
e <y>. 

Al mismo tiempo se pueden especificar las dimensiones de una ventana grafica dando los 
cuatro ultimos parametros (opcionales). Si estos parametros definen posiciones externas a 
la pantalla, el borde de la ventana sera el borde de la pantalla. 

Palabras clave asociadas: CLG, WINDOW. 
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OUT 

OUT {numero de puerta) .{expresion entera) 

OUT &F8F4,&FF 

Orden. Envia el valor de <expresion entera) (margen de a 255) a la direction especificada 
por < numero de puerta). 

Esta orden no debe ser utilizada si no se sabe cuales son sus efectos. 

Palabras clave asociadas: INP, WAIT. 

PAPER 

PAPER [# {expresion de numero de canal) ,](tinta) 

10 MODE 0:PEN 0:INK 0,13 

20 FOR p = 1 TO 15 

30 PAPER p:CLS 

40 LOCATE 7,12:PRINT "paper";p 

50 FOR t=1 TO 500:NEXT t,p 

run 

Orden. Establece que tinta se va a utilizar para escribir el fondo (papel) de los caracteres. Si los 
caracteres se envfan a la pantalla de texto, la celda se rellena con el color actual del papel 
antes de escribir el caracter (a menos que se haya elegido el modo transparente). 

Si se omite la < expresion de numero de canal) se supone el #0. 

El numero de tintas utilizables simultaneamente depende del modo de pantalla. 

Palabras clave asociadas: INK, PEN, WINDOW. 

PEEK 

PEEK(<exp/-es/d/7 de direction de memoria)) 

10 MODE 1:ZONE 7 

20 WINDOW 1,40,1, 3: WIN DOW #1,1,40,4,25 

30 LOCATE 13,1:PRINT"MEMORIA" 

40 PRINT:PRINT"Direccion" 

50 LOCATE 20,3:PRINT"Contenido" 

60 FOR n=0TO 65535 

70 p = PEEK(n) 

80 PRINT #1,n,"(&";HEX$(n);")"; 

90 PRINT #1,TAB(20);p,"(&";HEX$(p);")" 

100 NEXT 

run 
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Funcion. Da el contenido de la position de memoria especificada por el argumento, el cual 
debe estar en el margen de &0000 a &FFFF (0 a 65535). En todos los casos, el valor produci- 
do sera el contenido de la position de memoria de la RAM (no de la ROM) y estara entre 
&00 y &FF (entre y 255). 

Palabras clave asociadas: POKE. 

PEN 

PEN [#(expresion de numero de canal) ,]{tinta) 

10 MODE 0:PAPER 0:INK 0.13 

20 FOR p = 1 TO 15 

30 PEN p:PRINT SPACE$(47);"pen";p 

40 FOR t = 1 TO 500:NEXT t,p:GOTO 20 

run 

Orden. Establece la <tinta> (margen de a 15) con la que se escribiran los caracteres en 
lo sucesivo en el canal especificado (en el #0 si no se especifica ninguno). 

Palabras clave asociadas: INK, PAPER. 

PI 

PI 

PRINT PI 
3.14159265 

Funcion. Da el valor del numero tt. 
Palabras clave asociadas: DEG, RAD. 

PLOT 

PLOT {coordenada x) .{coordenada y)[,{tinta)] 

10 MODE 1:BORDER 0:PAPER 0:PEN 1 

20 INK 0,0:INK 1,26:INK 2,13,26:DEG 

30 FOR x=1 TO 360:ORIGIN 320,200 

40 DRAW 50*COS(x),50*SIN(x),1 

50 PLOT 100*COS(x),25*SIN(x):NEXT 

60 ORIGIN 0,0:t=TIME+700:WHILE TIME<t 

70 PLOT RND*640,RND*400:WEND 

80 PLOT RND*640,RND*400,2 

90 GOTO 90 

run 
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Orden. Dibuja un punto en la pantalla grafica, en la position absoluta especificada por los 
parametros <coordenada x> y <coordenada y>. Tambien se puede especificar la <tinta> con 
la que se debe dibujar (margen de a 15). 

Palabras clave asociadas: DRAW, DRAWR, MOVE, MOVER, ORIGIN, PLOTR, TEST, 
TESTR, XPOS, YPOS. 



PLOTR 

PLOTR {incremento de x) .{incremento de y}[,(tinta}] 

10 REM dibujo de rectas con las teclas del cursor 

20 BORDER 

30 MODE 1:PLOT 320,200,1 

40 IF INKEY(0)=0 THEN PLOTR 0,1 

50 IF INKEY(1)=0 THEN PLOTR 1,0 

60 IF INKEY(2)=0 THEN PLOTR 0,-1 

70 IF INKEY(8)=0 THEN PLOTR -1,0 

80 IF INKEY(9)=0 THEN 30:REM copia = borrar 

90 GOTO 40 

run 

Orden. Dibuja un punto en la pantalla grafica en una position que, referida a la actual, 
viene dada por los parametros < incremento de x> e < incremento de y>. Se puede utilizar 
el parametro optional <tinta> para cambiar la tinta de la pluma grafica (margen de a 15). 

Palabras clave asociadas: DRAW, DRAWR, MOVE, MOVER, ORIGIN, PLOT, TEST, 
TESTR, XPOS, YPOS. 

POKE 

POKE (expresion de direction de memoria) .(expresion entera) 

10 FOR m =49152 TO 65535 
20 POKE m,100 
30 NEXT 
run 

Orden. Escribe el valor de la < expresion entera) (margen de a 255) en la memoria de la 
maquina (RAM), en la position especificada por el parametro < expresion de direction de 
memoria). 

Esta orden no se debe utilizar si no se sabe cuales son sus efectos. 

Palabras clave asociadas: PEEK. 
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POS 

POS{# (expresion de numero de canal)) 

PRINT POS(#0) 
1 

Funcion. Da la position horizontal del cursor de texto referida al borde izquierdo de la ven- 
tana. El parametro (expresion de numero de canal) tiene que ser especificado, aunque sea 
el #0. 

POS(#8) da la position horizontal de la cabeza impresora, siendo 1 la position del extremo 
izquierdo. 

POS(#9) da la position logica en el canal de la cinta, esto es, el numero de caracteres tipo- 
graficos enviados a la cinta despues del ultimo retorno del carro. 

Palabras clave asociadas: VPOS, WINDOW. 



PRINT 

PRINT [#{expresion de numero de canal) ,][(/ista de:(e/emento que se escribe)] 

10 a$="corta" 

20 b$ = "esta cadena es mas larga" 

30 PRINT a$;a$ 

40 PRINT a$,a$ 

50 PRINT 

60 PRINT b$;b$ 

70 PRINT b$,b$ 

run 

Orden. Envia los (elementos que se escriben) al canal especificado (o al #0, si no se especi- 
fica ninguno). 

Cuando se utiliza un signo de punto y coma (;) para separar los elementos de la lista, el 
ordenador escribe cada elemento inmediatamente despues del anterior; no obstante, BASIC 
comprueba si el elemento siguiente cabe en la misma linea y, si no cabe, salta a la linea si- 
guiente a pesar del signo de punto y coma. 

Analogamente, la coma (,) especifica que el siguiente elemento se debe escribir en la siguien- 
te zona de escritura; no obstante, BASIC comprueba si con el elemento actual se ha rebasa- 
do la anchura de la zona de escritura y, si es asi, escribe el siguiente elemento en una zona 
mas a la derecha. 
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PRINT SPC 
PRINT TAB 

PRINT [# {expresion de numero de canal) ,][{/ista de:{elemento que se escribe)][;] 
[SPC{{expresion entera))][{/ista de:{elemento que se escribe)] 

PRINT [ft (expresion de numero de canal) ,][(//sta de:{elemento que se escribe)][;] 
[JAB{{expresion entera))][{/ista de:{elemento que se escribe)] 

10 PRINT "Esta es la funcion SPC" 

20 FOR x=6 TO 15 

30 PRINT SPC(5)"a";SPC(x)"b" 

40 NEXT 

50 PRINT "Esta es la funcion TAB" 

60 FOR x=6 TO 15 

70 PRINT TAB(5)"a";TAB(x)"b" 

80 NEXT 

run 

SPC escribe el numero de espacios especificado por la (expresion entera) y luego, inmedia- 
tamente a su derecha, el siguiente <elemento> (en el supuesto de que quepa en la misma 
li'nea). Por consiguiente, no es necesario poner el signo de punto y coma despues de SPC. 

TAB avanza (escribiendo espacios) hasta la posicion especificada por la (expresion entera), 
referida al borde izquierdo de la ventana, y luego, inmediatamente a la derecha de esa posi- 
cion, escribe el siguiente <elemento> (en el supuesto de que quepa en la misma linea). Por 
consiguiente, no es necesario poner el signo de punto y coma despues de TAB. Si la posicion 
actual es mayor que la especificada, primero se realiza un retorno de carro y avance de li'nea 
y despues el avance de los espacios necesarios. 



PRINT USING 

PRINT [it {expresion de numero de cana/)][{/ista de:{elemento que se escribe)]{;] 
[USING {plantilla de formato)][{separador){expresion) 

10 FOR x=1 TO 10 

20 n = 100000 *(RNDT5) 

30 PRINT "Precio";USING "########, .##";n 

40 NEXT 

run 

PRINT USING permite especificar el formato de la expresion escrita con PRINT. Esto se 
consigue especificando una (plantilla de formato) a la que la escritura ha de amoldarse. 
El (separador) es una coma o un punto y coma. La (plantilla de formato) es una cadena 
literal construida con los siguientes 'especificadores de formato': 
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Formatos numericos 

Para el niimero en si: 

# Cada # especifica una position (para un digito). 

Ejemplo: ###### 

Especifica la position del punto decimal. 

Ejemplo: ######.## 

(Especifica una position.) Solo puede aparecer antes del punto decimal. Especifica 

que los digitos que queden a la izquierda del punto decimal deben separarse median- 

te comas en grupos de tres. 

Ejemplo: #####,.## 

Para antes y despues del niimero: 

$$ (Especifica dos posiciones.) Especifica que se debe escribir un signo $ inmediata- 
mente antes del primer digito o del punto decimal, despues del signo + o - (si lo 
hay). Observese que el signo $ ocupara una de las posiciones para digitos. 
Ejemplo: $$######,.## 

* * $ (Especifica tres posiciones.) Actua como las opciones * * y $$ combinadas, es decir, 
con asteriscos por la izquierda y el signo $. 
Ejemplo: **$######,.## 

+ Especifica que se debe escribir el signo + o el - (segiin corresponda). Si se incluye 

el signo + al principio de la plantilla, el signo se escribira inmediatamente antes del 
niimero (y del signo $, si se lo ha especificado). Si se incluye el signo + al final de 
la plantilla, el signo se escribe a la derecha del niimero (y del exponente, si lo hay). 
Ejemplo: +####.#### 

Este signo solo se puede poner al final de la plantilla. Especifica que, si el niimero 
es negativo, se debe escribir el signo - a su derecha (y a la derecha del exponente, 
si lo hay). Si el niimero es positivo, a su derecha se escribe un espacio. Si no se espe- 
cifica esto, se escribe automaticamente un signo - a la izquierda de todos los niime- 
ros negativos. 
Ejemplo: ####.####- 

TTTT Especifica que el niimero se debe escribir en forma exponential. Los signos TTTT 
se deben poner a la derecha de las posiciones para digitos, pero a la izquierda de 
los signos + y - (si los hay). 
Ejemplo: ##.####TttT + 

La < plantilla de formato) para niimeros no puede contener mas de 20 caracteres. Los nii- 

meros son redondeados antes de escribirlos con los digitos especificados. 

Si el formato es demasiado pequeno para el niimero que se ha de escribir, por ejemplo 

PRINT USING "#### ";12345678 

el niimero no se trunca, sino que se lo escribe entero, precedido de un signo % para indicar 
el 'fallo de formato'. 
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Formatos literales 

10 CLS:a$="abcdefghijklmnopq" 

20 PRINT "expresion de entrada = ";a$ 

30 PRINT:PRINT "con especificador ! = "; 

40 PRINT USING "!";a$ 

50 PRINT:PRINT "con especificador \espacios\ = "; 

60 PRINT USING "\ \ ";a$ 

70 PRINT:PRINT "con especificador & = "; 

80 PRINT USING "&";a$ 

90 GOTO 90 

run 

! Especifica que solamente se debe escribir el primer caracter de la cadena. 

Ejemplo: ! 

\<espacios>\ 

Especifica que solamente se deben escribir los x primeros caracteres de la cadena, 
siendo x la longitud de la plantilla (incluidas las barras inclinadas hacia la 
izquierda). 
Ejemplo: \ \ 

& Especifica que se debe escribir la cadena completa sin modificarla. 

Ejemplo: & 

La < plantilla de formato) para cadenas literales no puede contener mas de 255 caracteres. 

Las plantillas de formato, tanto si son numericas como si son literales, pueden ser represen- 
tadas por variables literales; por ejemplo: 

10a$ = "$$######,.##" 

20 b$ = "!" 

30 PRINT USING a$;12345.6789 

40 PRINT USING b$;"kilobytes" 

run 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas information acerca de 
los formatos de impresion. 

Palabras clave relacionadas: SPC, TAB, USING, ZONE. 



RAD 

RAD 

RAD 
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Orden. Hace que BASIC entienda los argumentos de las funciones trigonometricas en ra- 
dianes. Esta es la situation implicita que se establece en el momento de encender la maqui- 
na, cuando se la reinicializa y cuando se ejecutan las ordenes NEW, CLEAR, LOAD, RUN, 
etc. 

Palabras clave asociadas: ATN, COS, DEG, SIN, TAN. 



RANDOMIZE 

RANDOMIZE [{expresion numerical 

RANDOMIZE 123.456 
PRINT RND 
0.258852139 

Orden. El generador de numeros aleatorios de BASIC produce una sucesion pseudo- 
aleatoria en la que cada niimero depende del anterior. La sucesion es siempre la misma. 
RANDOMIZE hace que los numeros aleatorios se tomen de esa sucesion a partir de la posi- 
tion dada por la < expresion numerica) o, si se omite esta, por un valor que el usuario debe 
teclear. 

RANDOMIZE TIME produce una sucesion que es muy dificil de repetir. 

Palabras clave asociadas: RND. 

READ 

READ {lista de: {variable) 

10 FOR n = 1 TO 8 

20 READ a$,c 

30 PRINT a$;" ";:SOUND 1,c:NEXT 

40 DATA en,478,todas,426,las,379,escalas,358 

50 DATA musicales,319,hay,284,8,253,notas,239 

run 

Orden. Lee datos de las listas precedidas de DATA y los asigna a variables, actualizando 
automaticamente el 'puntero' de forma que este senale el siguiente dato. Se puede utilizar 
la orden RESTORE para hacer que el puntero sefiale el primer dato de una determinada 
lista DATA. 

En la parte 2 del capitulo titulado 'Cuando usted guste . . . ' daremos mas amplia informa- 
tion a este respecto. 

Palabras clave asociadas: DATA, RESTORE. 
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RELEASE 

RELEASE {canales de sonido) 

10 SOUND 65,1000,100 

20 PRINT "Pulse R para liberar el sonido" 

30 IF INKEY(50) = -1 THEN 30 

40 RELEASE 1 

run 

Orden. Libera los canales de sonido que han sido retenidos en una orden SOUND. 

El parametro (canales de sonido) tiene que dar un valor entero comprendido entre 1 y 7. 
Su significado es el siguiente: 

1 libera el canal A 

2 libera el canal B 

3 libera los canales A y B 

4 libera el canal C 

5 libera los canales A y C 

6 libera los canales B y C 

7 libera los canales A, B y C 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas amplia informacion acer- 
ca de los sonidos. 

Palabras clave asociadas: SOUND. 



REM 

REM {resto de la linea) 

10 REM Caza a muerte de los invasores del 
hiperespacio intergalactico, por AMSOFT 
20 REM Copyright AMSOFT 1985 

Orden. Precede a las observaciones o anotaciones al programa. Hace que BASIC ignore 
el resto de la linea, en el cual pueden figurar caracteres cualesquiera, incluso el signo de 
dos puntos (:), que normalmente se utiliza para separar instrucciones. 

En lugar de :REM se puede poner una comilla sencilla (') en todos los casos salvo en las 
lineas de DATA, en las que el signo ' se interpreta como integrante de una cadena literal. 
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REMAIN 

REMAIN ({numero de temporizador)) 

10 AFTER 500,1 GOSUB 40 

20 AFTER 100,2 GOSUB 50 

30 PRINT "Programs funcionando":GOTO 30 

40 REM esta subrutina no sera invocada porque 

lo impide la linea 80 
50 PRINT:PRINT "El temporizador 1 va a ser "; 
60 PRINT "inhibido por REMAIN." 
70 PRINT "Unidades de tiempo que quedaban:"; 
80 PRINT REMAINd) 
run 

Funcion. Da la cuenta restante en el temporizador especificado (margen de a 3) y lo 
desactiva. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas information acerca de 
las interrupciones. 

Palabras clave asociadas: AFTER, Dl, El, EVERY. 



RENUM 

RENUM [{nuevo numero de /inea}][,[<antiguo numero de /IneayMAincremento}]] 

10 CLS 

20 REM esta linea sera la 123 

30 REM esta linea sera la 124 

40 REM esta linea sera la 125 

RENUM 123,20,1 

LIST 

Orden. Renumera las lineas del programa. 

El parametro (antiguo numero de linea) especifica el numero de linea actual en el cual debe 
comenzar la renumeracion. Si se omite ese parametro, la renumeracion se realiza desde el 
principio del programa. 

El parametro <nuevo numero de linea) especifica que numero se va a dar a la primera linea 
renumerada. Si se omite este parametro, el programa renumerado empieza en la linea 10. 

El parametro (incremento) especifica el salto que habra entre cada dos numeros de linea 
sucesivos. Si se lo omite, el incremento es 10. 
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RENUM modifica correctamente los numeros de linea citados en las instrucciones 
GOTO, GOSUB y similares. Sin embargo, no se modifican las referencias a numeros de 
linea que esten contenidas en expresiones literales, tales como las que intervienen en las 6r- 
denes KEY, ni tampoco las contenidas en lineas REM, ni las <expresiones de niimero de 
linea) incluidas en CHAIN y CHAIN MERGE. 

Los numeros de linea validos son los comprendidos entre 1 y 65535. 

Palabras clave asociadas: DELETE, LIST. 



RESTORE 

RESTORE {{niimero de linea)] 

10 READ s$:PRINT a$;" "; 

20 RESTORE 50 

30 FOR t=1 TO 500:NEXT:GOTO 10 

40 DATA restaure los datos para leerlos una vez 

50 DATA y otra 

run 

Orden. Hace que el 'puntero' de datos 'apunte' hacia el principio de la linea de DATA espe- 
cificada por el parametro opcional < niimero de linea). Si se omite el parametro, el puntero 
seflala la primera linea de DATA del programa. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas information a este 
respecto. 

Palabras clave asociadas: DATA, READ. 



RESUME 

RESUME {{niimero de linea)] 

10 ON ERROR GOTO 60 

20 FOR x=10 TO STEP -1:PRINT 1/x:NEXT 

30 END 

40 PRINT "llegamos hasta aqui despues del error' 

50 END 

60 PRINT "error numero";ERR;"en la linea";ERL 

70 RESUME 40 

run 
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Orden. Reanuda la ejecucion normal del programa una vez detectado un error y procesado 
por una orden ON ERROR GOTO. Si se omite el <numero de h'nea), el programa continua 
en la misma linea en la que se produjo el error. Suprima el <niimero de h'nea) en el ejemplo 
anterior y ejecute nuevamente el programa: 

70 RESUME 



Palabras clave asociadas: ERL, ERR, ERROR, ON ERROR GOTO, RESUME NEXT. 



RESUME NEXT 

RESUME NEXT 

10 ON ERROR GOTO 90 

20 PRINT "Pulse siempre INTRO" 

30 INPUT "1";a 

40 INPUT "2";a 

50 inpot "3";a REM error de sintaxis 

60 INPUT "4";a 

70 INPUT "5";a 

80 END 

90 PRINT "error numero";ERR;"en la linea";ERL 

100 RESUME NEXT 

run 

Orden. Reanuda la ejecucion normal del programa una vez detectado un error y procesado 
por una orden ON ERROR GOTO. 

RESUME NEXT reanuda la ejecucion en la linea siguiente a aquella en la que se detecto 
el error. 

Palabras clave asociadas: ERL, ERR, ERROR, ON ERROR GOTO, RESUME. 



RETURN 

RETURN 

10 GOSUB 50:PRINT "despues del GOSUB":END 

50 FOR n = 1 TO 20 

60 PRINT "subrutina" 

70 NEXT:PRINT 

80 RETURN 

run 
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Orden. Senala el final de una subrutina. BASIC retorna de la subrutina a la instruction in- 
mediatamente posterior a aquella que invoco la subrutina. 

Palabras clave asociadas: GOSUB. 



RIGHTS 

RIGHT$(<expres/d/7 literal) .{longitud deseada)) 

10 MODE 0:a$= "Ordenador CPC464" 
20 FOR n = 1 TO 16:LOCATE 21-n,n 
30 PRINT RIGHT$(a$,n) 
40 NEXT 
run 

Funcion. Produce una cadena que consta del numero de caracteres dado por < longitud 
deseada) (margen de a 255) tornados de la derecha de la < expresion literal). Si la longitud 
de la < expresion literal) es menor que la < longitud deseada), la cadena producida es la Ex- 
presion literal) completa. 

Palabras clave asociadas: LEFT$, MID$. 



RND 

RND[(< expresion numerica))] 

10 RANDOMIZE 

20 FOR x=1 TO -1 STEP -1 

30 PRINT "parametro de rnd =";x 

40 FOR n = 1 TO 6 

50 PRINT RND(X) 

60 NEXT n,x 

run 

Funcion. Da el siguiente numero aleatorio de la sucesion en el caso de que la < expresion 
numerica) tenga valor positivo o no haya sido especificada. 

Si la < expresion numerica) toma valor cero, RND vuelve a dar el anterior numero aleatorio 
generado. 

Si la < expresion numerica) toma un valor negativo, se inicia una nueva sucesion aleatoria 
y RND da su primer numero. 

Palabras clave asociadas: RANDOMIZE. 
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ROUND 

R O U N D { < expresion numerica ) [ , ( decimates > ] ) 

10 FOR n=4 TO -4 STEP -1 
20 PRINT ROUND(1234.5678,n), 
30 PRINT "con (decimales) =";n 
40 NEXT 
run 

Funcion. Redondea la (expresion numerica) a un niimero de decimales o potencia de diez 
especificada por (decimales). Si (decimales) es menor que cero, se redondea la (expresion 
numerica) para dar un numero entero seguido de tantos ceros antes del punto decimal co- 
mo indique el parametro (decimales). 

Palabras clave asociadas: ABS, CI NT, FIX, INT. 



RUN 

RUN (expresion literal) 

RUN "miprograma" 

Orden. Carga un programa de BASIC o un programa binario que este grabado en cinta 
e inicia su ejecucion. Borra el programa anteriormente residente en la memoria. 

Si no se especifica nombre de fichero, BASIC intenta cargar el primer fichero valido que 
encuentra en la cinta. Si el primer caracter del nombre es !, BASIC suprime tanto este carac- 
ter como todos los mensajes que de otra forma generaria el sistema de cinta. 

Los programas de BASIC protegidos pueden ser ejecutados por este procedimiento. 

Palabras clave asociadas: LOAD. 



RUN 

RUN [{numero de linea)] 

RUN 200 

Orden. Inicia la ejecucion del programa de BASIC actual a partir de la linea especificada 
por (numero de linea), o a partir de la primera linea del programa si se omite el parametro. 

Los programas protegidos no pueden ser ejecutados por este procedimiento. 

Palabras clave asociadas: CONT, END, STOP. 
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SAVE 

SAVE (nombre de fichero)[,{tipo de fichero)][,(parametros binarios)] 

SAVE "fichero.xyz" 
graba el fichero en modo de BASIC no protegido normal. 

SAVE "fichero.xyz",P 
graba el fichero en modo de BASIC protegido. 

SAVE "fichero. xyz",A 
graba el fichero en modo ASCII. 

SAVE "fichero.xyz",B,8000,3000,8001 

graba el fichero en modo binario. En este ejemplo, graba la zona de memoria del ordenador 
que empieza en la direction 8000 y tiene una extension de 3000 bytes; el punto de entrada 
optional es 8001. 

Orden. Graba en cinta el programa actualmente residente en la memoria. Un fichero bina- 
rio consiste en una zona de memoria copiada en la cinta. Los parametros son en este caso: 

(direction inicial) .(longitud del fichero)[,(punto de entrada)] 

La memoria dedicada a la pantalla se puede grabar en forma de fichero binario. Es lo que 
se denomina 'volcado de la pantalla'; la orden necesaria es: 

SAVE "pantalla", B,&C000,&4000 

El fichero se puede volver a cargar con la orden: 

LOAD "pantalla" -C 

/ '■4W 

Si el primer caracter del nombre del fichero es !, BASIC suprime tanto este caracter como 
todos los mensajes que de otra forma generarian el sistema de cinta. 

Palabras clave asociadas: CHAIN, CHAIN MERGE, LOAD, MERGE, RUN. 

SGN 

SGN[(expresi6n numerica)) 

10 FOR n = 200 TO -200 STEP-20 

20 PRINT "SGN da"; 

30 PRINT SGN(n);"cuando el numero es";n 

40 NEXT 

run 
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Funcion. Determina el signo de la < expresion numerica). Da el valor -1 si la < expresion 
numerica) es menor que cero; el valor si es igual a 0; y el valor 1 si es mayor que cero. 
Palabras clave asociadas: ABS. 

SIN 

SIN( (expresion numerica)) 

10 CLS:DEG:ORIGIN 0,200 

20 FOR n=0 TO 720 

30 y=SIN(n) 

40 PLOT n*640/720,198*y:NEXT 

50 GOTO 50 

run 

Funcion. Calcula el seno de la < expresion numerica). 

Observese que se puede utilizar DEG y RAD para hacer que el ordenador entienda los arcos 
como dados en grados o en radianes, respectivamente. 

Palabras clave asociadas: ATN, DEG, COS, RAD, TAN. 
SOUND 

SOUND (situacion de canales) .(periodo de tono)[,(duraci6n)[,(volumen) 

[.{envolvente de volumen)[,(envolvente de tono)[,(ruido)]]]\\ 

10 FOR z=0 TO 4095 
20 SOUND 1,z,1,12 
30 NEXT 
run 

Orden. Programa la generation de un sonido. Los parametros son los siguientes: 
Parametro 1: < situacion de canales) 

El parametro < situacion de canales) debe tener un valor comprendido entre 1 y 255. El sig- 
nificado de cada uno de los bits es como sigue: 

Bit (decimal 1) enviar sonido al canal A (bit menos significativo) 

Bit 1 (decimal 2) enviar sonido al canal B 

Bit 2 (decimal 4) enviar sonido al canal C 

Bit 3 (decimal 8) sincronizacion con el canal A 

Bit 4 (decimal 16 sincronizacion con el canal B 

Bit 5 (decimal 32) sincronizacion con el canal C 

Bit 6 (decimal 64) retention del canal de sonido 

Bit 7 (decimal 128) borrado del canal de sonido (bit mas significativo) 



3 /62 Lista completa de las palabras clave del BASIC de AMSTRAD 



Por ejemplo, el valor 68 del parametro (situation de canales) especifica: 
Enviar el sonido al canal C (4) y retenerlo (64). 

Parametro 2: (periodo de tono) 

Este parametro define el tono del sonido; es decir, identifica la nota (DO, RE, MI, FA, 
etc.)- Cada nota tiene un numero de identification, que es el (periodo de tono). Vease el 
capitulo titulado 'Para su referenda . . .'. 

Parametro 3: (duration) 

Este parametro especifica la duration del sonido. Las unidades son de centesimas de segun- 
do (0.01 s). Si no se especifica duration, el ordenador toma el valor implicito para este para- 
metro, que es 20 (un quinto de segundo). 

Si el valor de (duration) es cero, el sonido dura hasta el final de la envolvente de volumen 
especificada. 

Si el valor de (duration) es negativo, la envolvente de volumen especificada se repite 
ABS(( duration)) veces. 

Parametro 4: (volumen) 

Este parametro especifica el volumen initial de la nota. El margen de valores va de a 15. 
El (volumen) es el minimo; el 15 es el maximo. Si no se especifica (volumen), el ordena- 
dor toma el implicito, que es 12. 

Parametro 5: (envolvente de volumen) 

Se puede hacer que el volumen de la nota no sea constante, sino que varie con el tiempo 
mientras la nota esta sonando. Para especificar la forma de variation del volumen con el 
tiempo se utiliza la orden ENV. De hecho, se pueden crear hasta 15 envolventes de volumen 
diferentes, con numeros de referenda del 1 al 15. El parametro (envolvente de volumen) 
invoca una envolvente de volumen para su utilization por SOUND. 

Vease la description de la orden ENV. 

Parametro 6: (envolvente de tono) 

Se puede hacer que el tono de una nota no sea constante, sino que varie con el tiempo mien- 
tras la nota esta sonando. Para especificar la forma de variation del tono con el tiempo 
se utiliza la orden ENT. De hecho, se pueden crear hasta 15 envolventes de 
tono diferente, con numeros de referenda del 1 al 15. El parametro (envolvente de tono) 
invoca una envolvente de tono para su utilization por SOUND. Si en la definition de ENT 
se ha puesto un numero negativo como numero de envolvente, en la instruction SOUND 
se debe poner el valor absoluto de ese numero como (envolvente de tono). 

Vease la description de la orden ENT. 
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Parametro 7: <ruido> 

Se puede anadir ruido al sonido: la intensidad del ruido se controla con el parametro 
<ruido>. El margen de valores va de (ruido apagado) hasta 31. 

En la parte 2 del capftulo 'Cuando usted guste . . . ' daremos mas amplia information sobre 
los sonidos. 

Palabras clave asociadas: ENT, ENV, ON SO. GOSUB, RELEASE, SQ. 

SPACES 

SPACE$( {expresion entera)) 

10 MODE 1 

20 PRINT "Pongamos 5 espacios entre uno"; 

30 PRINT SPACE$(5); 

40 PRINT "y otro" 

run 

Funcion. Crea una cadena literal consistente en el numero de espacios especificado por (ex- 
presion entera) (margen de a 255). 

Palabras clave asociadas: SPC, STRING$, TAB. 



SPC 

Vease PRINT SPC. 

SPEED INK 

SPEED INK {periodo 1),{periodo 2) 

10 BORDER 7,18 

20 FOR i=30 TO 1 STEP-1 

30 SPEED INK i,i 

40 FOR t = 1 TO 700:NEXT t,i 

run 

Orden. Establece la velocidad de alternancia entre los dos colores de tinta especificados me- 
diante INK o BORDER. El primer parametro, (periodo 1 >, especifica el tiempo para el pri- 
mer color, en unidades de 0.02 s (cincuentavos de segundo); (periodo 2) especifica el tiem- 
po para el segundo color. 

Tengase cuidado al elegir colores y velocidades para evitar efectos hipnotizantes. 
Palabras clave asociadas: BORDER, INK. 
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SPEED KEY 

SPEED KEY {demora de arranque) .{periodo de repetition) 

10 CLS:FOR k=7 TO 1 STEP-2 

20 PRINT "Escriba su nombre y pulse [INTRO]" 

30 SPEED KEY k,k 

40 LINE INPUT a$:NEXT 

50 PRINT "Es un nombre muy interesante" 

run 

Or den. Establece las caracteristicas de repetition de las teclas. El parametro < demora de 
arranque) especifica el tiempo, en unidades e 0.02 s (cincuentavos de segundo) que ha de 
estar pulsada la tecla antes de que empiece a repetirse su action. El parametro (periodo 
de repetition) especifica el tiempo que debe transcurrir entre cada dos repeticiones 
sucesivas. 

SPEED KEY solamente actiia sobre las teclas que son de repetition implicitamente o que 
han sido definidas como tales mediante KEY DEF. 

Cuando se vaya a utilizar valores muy bajos del parametro <demora de arranque), es acon- 
sejable definir previamente una de las teclas numericas para que devuelva el teclado a la 
situation implicita, SPEED KEY 30,2. La orden 

KEY 0,'SPEED KEY 30,2" + CHR$(13) 

restablece los valores implicitos de los parametros de SPEED KEY en cuanto se pulsa la 
tecla del del teclado numerico. 

Palabras clave asociadas: KEY DEF. 



SPEED WRITE 

SPEED WRITE {expresion entera) 

SPEED WRITE 1 

Orden. Establece la velocidad de transferencia de datos a la cinta. Las velocidades son: 
2000 bits por segundo, si < expresion entera) vale 1, y 1000 bits por segundo si < expresion 
entera) vale 0. Esta ultima es la velocidad implicita. Para leer una cinta no es necesario 
saber a que velocidad ha sido grabada, pues el ordenador selecciona automaticamente la 
velocidad correcta de lectura. 

La maxima fiabilidad en la transferencia de datos se obtiene con la velocidad minima, que 
ademas es la implicita: SPEED WRITE 0. 

Palabras clave asociadas: OPENOUT, SAVE. 
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SQ 

SQ( {canal)) 

10 SOUND 65,100,100 
20 PRINT SQ(1) 
run 
67 

Funcion. Genera un numero que informa del estado de la cola de sonido del < canal) especi- 
ficado. El parametro puede tener uno de los siguientes valores: 

1 para el canal A 

2 para el canal B 
4 para el canal C 

La funcion SQ produce un numero que se interpreta, segiin sea el valor de sus bits, de la 
forma siguiente: 



Bits 0, 1 y 2 
Bits 3, 4 y 5 
Bit 6 
Bit 7 



numero de huecos libres en la cola 

estado de sincronizacion de la primera nota de la cola 

la primera nota esta retenida 

el canal esta activo en la actualidad 



donde el bit es el menos significativo y el bit 7 el mas significativo. 

Como se puede apreciar, si el bit 6 esta a 1 , el bit 7 tiene que estar a cero, y viceversa. Analo- 
gamente, si alguno de los bits 3, 4 y 5 esta a 1, los bits 6 y 7 tienen que estar a cero. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas information acerca de 
los sonidos. 

Palabras clave asociadas: ON SQ GOSUB, SOUND. 



SQR 

S Q R ( < expresion n umerica > ) 

PRINT SQR(9) 
3 

Funcion. Da el valor de la raiz cuadrada de la <expresion numerica). 

STEP 

Vease FOR. 
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STOP 

STOP 

10 FOR n = 1 TO 30:PRINT n:NEXT 

20 STOP 

30 FOR n=31 TO 60:PRINT n:NEXT 

run 

cont 

Orden. Detiene la ejecucion del programa, pero deja BASIC en un estado tal, que el progra- 
ma puede ser reanudado mediante CONT. STOP se utiliza para establecer puntos de para- 
da en la depuration de programas. 

Palabras clave asociadas: CONT, END. 

STR$ 

ST R $ ( < expresidn n umerica > ) 

10 a = &FF :REM 255 en hexadecimal 

20 b = &X1111 :REM 15 en binario 

30 c$ = "***" 

40 PRINT c$ + STR$(a + b) + c$ 

run 

*** 270*** 

Funcion. Convierte la (expresion numerica) en una cadena literal formada por los mismos 
digitos decimales. 

Palabras clave asociadas: BIN$, HEX$, VAL. 

STRINGS 

STR\NG$«,/ongitud),<,especificador del caracter)) 

PRINT STRING$(40,"*") 

**************************************** 

Funcion. Da una cadena literal que consiste en el caracter especificado repetido tantas veces 
como indique <longitud> (margen de a 255). Notese que en el ejemplo anterior se podria 
haber puesto tambien: 

PRINT STRING$(40,42) 

**************************************** 

donde el (especificador del caracter), el niimero 42, es el codigo ASCII del asterisco. 
Palabras clave asociadas: SPACE$. 
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SWAP 

Vease WINDOW SWAP. 



SYMBOL 

SYMBOL {numero del caracter) ,{lista de:(fila) 
10 MODE 1:SYMBOL AFTER 105 



20fila1=255:REM 11111111 en binario 
30 fila2=129:REM 10000001 en binario 
40 fila3=189:REM 10111101 en binario 
50 fila4=153:REM 10011001 en binario 
60 fila5=153:REM 10011001 en binario 
70 fila6=189:REM 10111101 en binario 
80 fila7=129:REM 10000001 en binario 
90 fila8=255:REM 11111111 en binario 
100 PRINT "La linea 110 redefine la letra i (105). Teclee varias 

veces esa letra y luego liste el programa". 
110 SYMBOL 105,fila1,fila2,fila3,fila4,fila5,fila6,fila7,fila8 
run 

Orden. Redefine la forma de un caracter. El margen para todos los parametros es de a 

255. 

Con objeto de reservar espacio en la memoria del ordenador para la description del carac- 
ter, es necesario ejecutar previamente la orden: 

SYMBOL AFTER x 

donde x debe ser igual o menor que el numero del caracter que se va a definir. 

A continuation se emite la orden SYMBOL seguida, en primer lugar, por el numero del 
caracter. 

El caracter puede ser directamente accesible por el teclado; en cualquier caso se lo puede 
escribir mediante la orden 

PRINT CHR$(x) 

Despues de SYMBOL x viene una sucesion de hasta 8 parametros, cada uno de los cuales 
describe una fila de la matriz del caracter. El margen de estos parametros es de a 255. 
La representation binaria de cada parametro indica la situation de 'encendido' o 'apagado' 
de cada uno de los puntos de la fila correspondiente. 
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Por ejemplo, si el primero de los ochos parametros vale 1 , la fila superior del caracter dene 
la representacion binaria 00000001 . Cada 1 indica que el correspondiente punto del caracter 
se ilumina con el color de PEN; cada indica que el correspondiente punto no sera visible 
pues se lo escribe con el color de PAPER. Asi pues, la primera fila de este caracter consiste 

Tv^VrToV! 1 d eXtrem ° SUPeri ° r dereCha L ° S si § uientes Parametros son 
J,/,15,31 ,63,0,0. La representacion binaria de los ocho parametros es como sigue: 

parametro (fila) 1: 00000001 en binario ( 1 en decimal) 
parametro (fila) 2: 00000011 en binario ( 3 en decimal) 
parametro (fila) 3: 00000111 en binario ( 7 en decimal) 
parametro (fila) 4: 00001111 en binario (15 en decimal) 
parametro (fila) 5: 00011111 en binario (31 en decimal) 
parametro (fila) 6: 00111111 en binario (63 en decimal) 
parametro (fila) 7: 00000000 en binario ( en decimal) 
parametro (fila) 8: 00000000 en binario ( en decimal) 

Observando el conjunto de las representaciones binarias podemos hacernos una idea del as- 
fa'orden 6 * ^^ Asignem ° S CSt0S P arametr °s al caracter numero 255 mediante 

SYMBOL 255,1,3,7,15,31,63,0,0 

Al ser los dos ultimos, podemos omitirlos: 

SYMBOL 255,1,3,7,15,31,63 

Los parametros se pueden introducir en forma binaria, con lo que se ahorra el trabajo de 
convertirlos previamente a la forma decimal. (Recuerdese que el prefijo para numeros bina- 
nos es &X.) Por ejemplo: 

SYM BO L 255,&X00000001 ,&X0000001 1 ,&X000001 1 1 .&X00001 1 1 1 ,&X00011111, 

Finalmente, para ver el resultado de la definition, ejecute la orden 
PRINT CHR$(255) 

Si se redefine uno de los caracteres accesibles por el teclado, el nuevo caracter aparecera 
"Inn * V£Z QUe SC PUlSC la tecla ^"espondiente o se lo escriba con PRINT 

CHR$( ). Por otra parte, BASIC reconoce la forma del nuevo caracter cuando trata de leer- 
lo en la pantalla, y no lo rechaza por incomprensible. 

En la parte 2 del capitulo 'Cuando usted guste . . . ' daremos mas informacion sobre la rede- 
iimcion de caracteres. 

Palabras clave asociadas: HIMEM, MEMORY, SYMBOL AFTER. 
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SYMBOL AFTER 

SYMBOL AFTER (expresion entera) 

10 CLS 

20 SYMBOL AFTER 115 

30 PRINT "La linea 40 redefine la letra s "; 

40 SYMBOL 115,0,56,64,64,48,8,8,112 

50 PRINT "a s" 

60 PRINT "Cancele esta definicion de s" 

70 PRINT "con la orden SYMBOL AFTER 240" 

run 

Orden. Establece el numero de caracteres redefinibles por el usuario (en el margen de a 
256). El numero imph'cito es 240, lo que deja 16 caracteres (del 240 al 255) definibles por 
el usuario. Si <expresion entera) es 32, todos los caracteres, del 32 al 255, son definibles. 
SYMBOL AFTER 256 impide la redefinition de caracteres. 

Cada vez que se ejecuta una orden SYMBOL AFTER, quedan anuladas todas las redefini- 
ciones y la forma de todos los caracteres vuelve a ser la imph'cita. 

La orden SYMBOL AFTER no se puede ejecutar despues de modificar el valor de HIMEM, 
lo cual puede ocurrir como resultado de una orden MEMORY, o bien al abrir un tampon 
para la grabacion o lectura de un fichero con OPENOUT u OPENIN. En tales circunstan- 
cias se provoca el mensaje 'Improper argument' ('argumento inadecuado', error numero 
5), a menos que la situation anterior fuera SYMBOL AFTER 256. 

En la parte 2 del capi'tulo 'Cuando usted guste . . . ' daremos mas information sobre la rede- 
finition de caracteres. 

Palabras clave asociadas: HIMEM, MEMORY, SYMBOL. 



TAB 

Vease PRINT TAB. 

TAG 

TAG [#(expresion de numero de canal)] 

10 INPUT "Escriba su nombre: ",a$:CLS 

20 PRINT "Se mueve usted mucho, ";a$ 

30 TAG 

40 x=LEN(a$)*17:y=50 + RND*300:MOVE -x,y 

50 FOR f=-x TO 640 STEP RND*7+3 

60 MOVE f,y:PRINT " ";a$;:CALL &BD19:NEXT 
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70 FOR b=640 TO -x STEP-RND*7+3 

80 MOVE b,y:PRINT a$;" ";:CALL &BD19:NEXT 

90 GOTO 40 

run 

Orden. Hace que el texto enviado al canal especificado sea escrito en la pantalla grafica, 
en la posicion actual del cursor. De esta forma se puede mezclar texto con graficos, o mover 
los caracteres pixel a pixel. Si se omite la <expresion de niimero de canal), se supone el #0. 

El punto superior izquierdo del caracter se conecta al cursor grafico. Si se omite el signo 
de punto y coma al final de la instruccion PRINT, los codigos de retorno del carro y de 
avance de linea se visualizan como caracteres graficos. 

Si se ha aplicado TAG al canal #0, BASIC desactiva TAG al volver a modo directo. 

Palabras clave asociadas: TAGOFF. 

TAGOFF 

TAGOFF [# (expresion de numero de cana/}] 

10 MODE 2:TAG :REM texto ligado al cursor grafico 

20 periodo = 1986: FOR x=1 TO 640 STEP 70 

30 MOVE x,400:DRAWR 0,-350 

40 periodo = periodo + 1:PRINT periodo;:NEXT 

50 TAGOFF :REM texto desconectado de cursor grafico 

60 LOCATE 34,25:PRINT "Datos anuales" 

70 GOTO 70 

run 

Orden. Cancela la orden TAG para el canal especificado (o para el #0, si no se especifica 
otro) y redirige el texto a la posicion que tenia el cursor de texto antes de ejecutarse TAG. 

Palabras clave asociadas: TAG. 



TAN 

TMK{expresi6n numerica)) 

PRINT TAN(45) 
1.61977519 

Funcion. Calcula la tangente de la <expresion numerica) , que debe tener un valor compren- 
dido entre -20000 y +20000. 

Observese que se puede utilizar DEG y RAD para hacer que el ordenador entienda los arcos 
como dados en grados o en radianes, respectivamente. 

Palabras clave asociadas: ATN, COS, DEG, RAD, SIN. 
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TEST 

TESX[{coordenada x) .{coordenada />) 

10 CLS 

20 PRINT "Estamos utilizando la pluma numero"; 

30 PRINT TEST(10,386) 

40 PRINT "Cambie la pluma y el modo "; 

50 PRINT "... y ejecute otra vez el programs." 

run 

Funcion. Traslada el cursor grafico al punto de coordenadas absolutas especificadas e in- 
forma del valor de la tinta presente en esa position. 

Palabras clave asociadas: DRAW, DRAWR, MOVE, MOVER, PLOT, PLOTR, TESTR, 
XPOS, YPOS. 



TESTR 

TESTR{(incremento de x) .{incremento de />) 

10 MODE 0:FOR x=1 TO 15:LOCATE 1.x 

20 PEN x:PRINT STRING$(10.143);:NEXT 

30 MOVE 200,400:PEN 1 

40 FOR n = 1 TO 23:LOCATE 12,n 

50 PRINT "pen";TESTR(0,-16):NEXT 

run 

Funcion. Lleva el cursor grafico a a un punto cuya position, referida a la position actual, 
viene dada por los parametros (incremento de x> e (incremento de y>, e informa del valor 
de la tinta presente en ese punto. 

Palabras clave asociadas: DRAW, DRAWR, MOVE, MOVER, PLOT, PLOTR, TEST, 
XPOS, YPOS. 



THEN 

Vease IF. 
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TIME 

TIME 

10 CLS:REM reloj 

20 INPUT "Hora: ",hora 

30 INPUT "Minuto: ",minuto 

40 INPUT "Segundo: ",segundo 

50 CLS:referencia = INT(TIME/300) 

60 WHILE hora<13 

70 WHILE minuto<60 

80 WHILE tiempo<60 

90 tiempo = (INT(TIME/300)-referencia)+segundo 

100 LOCATE 1,1 

110 PRINT USING "## ";hora,minuto,tiempo 

120 WEND 

130 tiempo=0:segundo=0:minuto = minuto + 1 

140 GOTO 50 

150 WEND 

160 minuto = 0:hora = hora + 1 

170 WEND 

180 hora = 1 

190 GOTO 60 

Funcion. Da el tiempo transcurrido desde el momento en que se encendio o reinicializo la 
maquina por ultima vez (excluyendo el dedicado a escribir o leer en el disco), en unidades 
de 1/300 s. Expresado en segundos, el tiempo es, pues, TIME/300. 

Palabras clave asociadas: AFTER, EVERY, WEND, WHILE. 

TO 

Vease FOR. 

TROFF 
TRON 

TROFF 
TRON 

10 TROFF:PRINT:PRINT "TROFF" 

20 FOR n = 1 TO 8 

30 PRINT "Programs funcionando":NEXT 

40 IF f = 1 THEN END 

50 TRON:PRINT:PRINT "TRON" 

60 f=1:GOTO 20 
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Orden. Sigue la 'traza' del programa escribiendo los niimeros de cada li'nea antes de ejecu- 
tarla. Los niimeros de linea aparecen entre corchetes [ ]. 

TRON activa este modo; TROFF lo desactiva. 

TRON es particularmente litil para estudiar la secuencia de niimeros de linea anterior al mo- 
menta en que se produce un error. 

Palabras clave asociadas: RUN. 



UNT 

UNT{(expresi6n de direction de memoria)) 

PRINT UNT(&FF66) 
-154 

Orden. Da un entero, comprendido entre -32768 y +32767, que es el equivalente en 'com- 
plemento a dos' al valor de (expresion de direction de memoria). 

Palabras clave asociadas: CINT, FIX, INT, ROUND. 



UPPERS 

UPPER$( {expresion literal)) 

10 CLS:a$="mire como crecen!" 

20 PRINT UPPER$(a$) 

run 

Funcion. Da una cadena literal que es copia de la (expresion literal) especificada, pero con- 
virtiendo las letras miniisculas en mayiisculas y dejando inalterados los restantes caracteres. 
Esta funcion es litil en el proceso de datos que puedan contener miniisculas mezcladas con 
mayiisculas. 

Palabras clave asociadas: LOWER$. 



USING 

Vease PRINT USING. 
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VAL 

WAL[(expresidn literal}) 

10 CLS:PRINT "Ya he aprendido la tabla de multiplicar" 

20 PRINT.PRINT "Pulse una tecla del 1 al 9:" 

30 a$ = INKEY$:IF a$="" THEN 30 

40 n = VAL(a$):IF n<1 OR n>9 THEN 30 

50 FOR x=1 TO 10 

60 PRINT n;"x";x;" = ";n*x 

70 NEXT: GOTO 20 

run 

Funcidn. Da el valor numerico (incluyendo el signo y el punto decimal) de los primeros ca- 
racteres de la (expresion literal) que sean digitos. 

Si el primer caracter no es un digito, el valor generado es 0. Si el primer caracter es el signo 
menos o el punto decimal y va seguido de caracteres no numericos, se provoca el mensaje 
'Type mismatch' ('incongruencia de tipos', error numero 13). 

Palabras clave asociadas: STR$. 



VPOS 

VPOSitt (expresion de numero de canal)) 

PRINT VPOS<#3) 

Funcidn. Da la position vertical del cursor de texto, referida al extremo superior de la ven- 
tana. Es necesario especificar la (expresion de numero de canal), pues el ordenador no da 
por supuesto el #0. 

Palabras clave asociadas: POS. 

WAIT 

WAIT (numero de puerta). (mascara)l, (inversion)} 

WAIT &FF34,20,25 

Or den. Espera hasta que por la puerta de entrada/salida especificada por < numero de 
puerta) se reciba un determinado valor. BASIC lee incesantemente la puerta. Con el valor 
recibido y el parametro (inversion) se realiza la operacion logica XOR; con este resultado 
y el parametro (mascara) se realiza la operacion logica AND; el proceso se repite hasta 
que el resultado final sea distinto de cero. 
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BASIC espera indefinidamente hasta que se cumple la condition requerida. 
Esta orden no debe ser utilizada por quien no sepa cuales son sus efectos. 
Palabras clave asociadas: INP, OUT. 

WEND 

WEND 

WEND 

Orden. Senala el final del grupo de instrucciones cuya ejecucion se repite en un bucle del 
tipo WHILE. BASIC determina automaticamente a que WHILE corresponde cada WEND. 
Palabras clave asociadas: TIME, WHILE. 

WHILE 

WHILE (expresion logica) 

10 CLS:PRINT "Temporizador de 10 segundos":t = TIME 

20 WHILE TIME<t+3000 

30 SOUND 1,0,100,15 

40 WENDrSOUND 129,40,30,15 



Orden. Repite la ejecucion de un grupo de instrucciones mientras se cumpla cierta condi- 
tion. La orden WHILE senala el principio del bucle y especifica la condition logica median- 
te la <expresion logica). 

Palabras clave asociadas: TIME, WEND. 



WIDTH 

WIDTH (expresion entera) 
WIDTH 40 

Orden. Informa a BASIC de cuantos caractes por linea se deben enviar a la impresora. BA- 
SIC envia a la impresora los codigos de retorno del carro y avance de linea en el momento 
adecuado. 

El valor implicito es 132. 
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La orden WIDTH 255 suprime los codigos de retorno del carro y avance de linea, dejando 
que el numero de caracteres por linea sea totalmente controlado por la impresora. En todo 
caso, la orden PRINT envia a la impresora esos dos codigos siempre que no se incluya el 
signo de punto y coma al final. 

Palabras clave asociadas: POS. 



WINDOW 

WINDOW [# {expresion de numero de canal) ,]{izquierda) ,{derecha) ,{arriba) ,{abajo) 

10 MODE 0:BORDER 0:REM carta de ajuste 

20 INK 0,0:INK 1,25:INK 2,23:INK 3,21 

30 INK 4,17:INK 5,6:INK 6,2:INK 7,26 

40 PAPER 0:CLS 

50 PAPER 1:WINDOW 2,4,1, 18:CLS 

60 PAPER 2:WINDOW 5,7,1,18:CLS 

70 PAPER 3:WINDOW 8,10,1, 18:CLS 

80 PAPER 4:WINDOW 11,13,1, 18:CLS 

90 PAPER 5:WINDOW 14,16,1,18:CLS 

100 PAPER 6:WINDOW 17,19,1,18:CLS 

110 PAPER 7:WINDOW 2,19,19,25:CLS 

120 GOTO 120 

run 

Orden. Especifica las dimensiones y situation de una ventana de texto. Los valores de los 
parametros <izquierda>, <derecha>, <arriba> y <abajo> indican los numeros extremos de 
columna y de fila, y deben ser consistentes con el modo de pantalla actual. 

Si no se especifica la (expresion de numero de canal), BASIC supone el #0. 

En la parte 2 del capftulo titulado 'Cuando usted guste . . . ' daremos mas information so- 
bre ventanas de texto. 

Palabras clave asociadas: WINDOW SWAP. 



WINDOW SWAP 

WINDOW SWAP {expresion de numero de canal) .{expresion de numero de canal) 

10 MODE 1:INK 1,24:INK 2,9:INK 3,6 

20 WINDOW 21,40,13,25:PAPER 3 

30 WINDOW #1,1,20,1,12:PAPER #1,2 

40 CLS:PRINT " Ventana numero 0" 

50 CLS #1:PRINT #1," Ventana numero 1" 

60 LOCATE 1,6 
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70 PRINT " Ventana roja (0)";SPC(2) 

80 LOCATE #1,1,6 

90 PRINT #1," Ventana verde (1)" 

100 FOR t = 1 TO 1000:NEXT 

110 WINDOW SWAP 0,1:GOTO 60 

run 

Orden. Intercambia las caracten'sticas de las dos ventanas de texto especificadas por las 
<expresiones de niimero de canal). 

Se deben especificar los dos niimeros de canal, pero en este caso no deben ir precedidos del 
signo #. 

En la parte 2 del capitulo titulado 'Cuando usted guste . . . ' daremos mas information so- 
bre ventanas de texto. 

Palabras clave asociadas: WINDOW. 



WRITE 

WRITE [# {expresion de numero de canal) ,\[{lista de datos)] 

10 REM escribir variables en la cinta 

20 INPUT "Escriba un numero: ",a 

30 INPUT "Escriba una palabra: ",a$ 

40 OPENOUT "Idatos" 

50 WRITE #9,a,a$ 

60 CLOSEOUT:PRINT "Datos grabados en cinta" 

run 

Orden. Envia los valores de los elementos de la <lista de datos) al canal especificado por 
la < expresion de numero de canal). Los elementos iran separados por comas; las cadenas 
literales iran entre comillas. 

En el ejemplo anterior, los valores captados por el teclado son enviados al canal #9 (cinta). 

Para leer esos valores despues de grabarlos en la cinta, se necesita un programa tal como 
el siguiente: 

10 REM leer variables en la cinta 

20 OPENIN "!datos":INPUT #9,a,a$ 

30 CLOSEIN:PRINT "Los dos valores son:" 

40 PRINT:PRINT a,a$ 

run 

Palabras clave asociadas: INPUT, LINE INPUT. 
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XOR 

{argumento} XOR {argumento) 

IF "juan'T'pepe" XOR "perro">"gato" THEN PRINT "verdadero" ELSE PRINT "falso" 

falso 

IF "pepe'T'juan" XOR "gato">"perro" THEN PRINT "verdadero" ELSE PRINT "falso" 

falso 

IF "juan'T'pepe" XOR "gato">"perro"THEN PRINT "verdadero" ELSE PRINT "falso" 

verdadero 

PRINT 1 XOR 1 


PRINT XOR 


PRINT 1 XOR 

1 

Operador. Realiza la operation logica 'o exclusivo' bit a bit entre enteros. El resultado es 
1 a menos que ambos bits tengan el mismo valor. 

Para mas amplia information sobre operaciones logicas, consulte la parte 2 del capitulo ti- 
tulado 'Cuando usted guste . . .'. 

Palabras clave asociadas: AND, OR, NOT. 



XPOS 

XPOS 

10 MODE 1:DRAW 320,200 

20 PRINT "Posicion horizontal del cursor grafico ="; 

30 PRINT XPOS 

run 

Funcion. Da el valor de la posicion horizontal (coordenada x) del cursor grafico. 
Palabras clave asociadas: MOVE, MOVER, ORIGIN, YPOS. 
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YPOS 

YPOS 

10 MODE 1:DRAW 320,200 

20 PRINT "Posicion vertical del cursor grafico ="; 

30 PRINT YPOS 

run 

Funcidn. Da el valor de la posicion vertical (coordenada y) del cursor grafico. 
Palabras clave asociadas: MOVE, MOVER, ORIGIN, XPOS. 

ZONE 

ZONE (expresion entera) 

10 CLS:FOR z=2 TO 20 

20 ZONE z 

30 PRINT "X", "X ZONE =";z:NEXT 

run 

Orden. Cambia la anchura de la zona de escritura (especificada en las instrucciones PRINT 
cuando se utiliza una coma para separar elementos). La achura implicita es 13 columnas, 
pero se la puede cambiar al valor dado por la < expresion entera), cuyo margen es de 1 a 

255. 

Palabras clave asociadas: PRINT, WIDTH. 
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Capitulo 4 

Para su referenda 



Este capitulo contiene la mayor parte de la information que usted pueda 
necesitar para aprender a manejar el ordenador. 

Temas tratados: 

* Posiciones del cursor y codigos de control 

* Interrupciones 

* Caracteres ASCII y caracteres graficos 

* Esquemas del teclado 

* Sonidos 

* Mensajes de error 

* Palabras reservadas de BASIC 

* Plantillas 

* Conexiones 

* Impresoras 

* Joysticks 

* Ampliaciones del sistema residentes (RSX) 

* Memoria 

Para mas completa information sobre BASIC y el firmware del CPC464, consultense las 
publicaciones SOFT157 y SOFT158, respectivamente. 
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Parte 1: Posiciones del cursor y codigos 
ampliados de control en BASIC 



En ciertas aplicaciones el cursor puede encontrarse fuera de la ventana de texto. Algunas 
operaciones fuerzan al cursor a ocupar una posicion permitida antes de poder ser llevadas 
a cabo. Son las siguientes: 

1. Escribir un caracter. 

2. Exhibir el signo del cursor (el rectangulo). 

3. Obedecer los codigos de control senalados con un asterisco en la tabla siguiente. 

El proceso de forzar el cursor a ocupar una posicion permitida consiste en lo siguiente: 

1. Si el cursor esta a la derecha del borde derecho de la ventana, salta al extremo izquierdo 
de la linea siguiente. 

2. Si el cursor esta a la izquierda del borde izquierdo de la ventana, salta al extremo dere- 
cho de la linea anterior. 

3. Si el cursor esta por encima del borde superior, el contenido de la ventana se desplaza 
una linea hacia abajo y el cursor aparece en la primera linea. 

4. Si el cursor esta por debajo del borde inferior, el contenido de la ventana se desplaza 
una linea hacia arriba y el cursor aparece en la ultima linea. 

Las comprobaciones y operaciones se realizan en el orden de la lista anterior. Las posicio- 
nes ilegales del cursor pueden ser cero o negativas, es decir, a la izquierda y por encima de 
la ventana. 

Los codigos del margen a 31 no producen ningtin simbolo cuando se los envia a la panta- 
11a, sino que son interpretados como codigos de control (y deben ser utilizados con cuida- 
do). Algunos de ellos alteran el significado de uno o varios de los codigos siguientes, que 
hacen las funciones de parametros del codigo original. 

Si se envia un codigo de control a la pantalla grafica, su efecto es dibujar un simbolo rela- 
cionado con la funcion que tendria si se lo generase mediante el teclado (v. g., &07 'BEL': 
[Ctrl! G). Ejercera su funcion de control si se lo envia a la pantalla mediante: 

PRINT CHR*<*07> o bien PRINT "ft" 

donde el simbolo del "timbre" se obtiene pulsando Ctrl G en el momento de teclear la 
instruction PRINT. 

Los codigos senalados con * en la lista siguiente fuerzan al cursor a ocupar una posicion 
permitida en la ventana antes de ser obedecidos. Para cada codigo se da el numero, en hexa- 
decimal y en decimal, y la description de su funcion. 
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Codigos de control en BASIC 



Valor 


Nombre 


Parametro 


Significado 


&00 


NUL 




Sin efecto. Se lo ignora. 


&01 1 


SOH 


a 255 


Escribe el sfmbolo correspondiente al valor 
del parametro, lo que permite exhibir los si'm- 
bolos del al 31. 


&02 2 


STX 




Hace invisible el cursor de texto. 


&03 3 


ETX 




Hace visible el cursor de texto. BASIC inhibe 
el cursor en todas las situaciones, salvo cuan- 
do esta esperando una entrada por el teclado. 
Tal action automatica de BASIC predomina 
sobre este codigo de control. 


&04 4 


EOT 


0a 2 


Establece el modo de pantalla. El parame- 
tro se toma MOD 4. Equivale a la orden 
MODE. 


&05 5 


ENQ 


a 255 


Envia a la position del cursor grafico el carac- 
ter correspondiente al valor del parametro. 


&06 6 


ACK 




Habilita la pantalla de texto. (Vease &15 
NAK.) 


&07 7 


BEL 




Produce un pitido. Observese que este codigo 
borra las colas de sonido. 


&08 8 


*BS 




Hace retroceder el cursor una position. 


&09 9 


*TAB 




Hace avanzar el cursor una position. 


&0A 10 


*LF 




Hace bajar el cursor una linea. 


&0B 11 


*VT 




Hace subir el cursor una linea. 


&0C 12 


FF 




Borra la ventana de texto y lleva el cursor al 
extremo superior izquierdo. Equivale a la or- 
den CLS. 



Para su referenda 
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Valor 



&0D 13 



&0E 14 



&0F 15 



&10 16 



&11 17 



&12 n 



&13 19 



&14 20 



&15 21 



&16 22 



Nombre 



*CR 



SO 



SI 



Parametro 



a 15 



*DLE 



*DC1 



a 15 



*DC2 



*DC3 



*DC4 



NAK 



SYN 



a 1 



Significado 



Lleva el cursor al extremo izquierdo de la li- 
nea actual. 



Establece la tinta asignada al papel. El para- 
metro se toma MOD 16. Equivale a la orden 
PAPER. 



Establece la tinta asignada a la pluma. El pa- 
rametro se toma MOD 16. Equivale a la orden 
PEN. 



Borra el caracter que esta en la posicion del 
cursor. Rellena la celula del caracter con el co- 
lor actual del papel. 



Borra desde el extremo izquierdo de la venta- 
na hasta la posicion actual del cursor inclusi- 
ve. Rellena las celulas afectadas con el color 
actual del papel. 



Borra desde la posicion actual del cursor in- 
clusive hasta el extremo derecho de la venta- 
na. Rellena las celulas afectadas con el color 
actual del papel. 



Borra desde el principio de la ventana hasta la 
posicion actual del cursor inclusive. Rellena 
las celulas afectadas con el color actual del 
papel. 



Borra desde la posicion actual del cursor in- 
clusive hasta el final de la ventana. Rellena 
las celulas afectadas con el color actual del 
papel. 



Inhibe la pantalla de texto, la cual no reaccio- 
na ante nada que se le envia mientras no reci- 
ba el codigo ACK (&06 6) 



Se toma el parametro MOD 2. Option de 
transparencia: desactiva, 1 activa. 
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Valor 


Nombre 


Parametro 


Significado 


&17 23 


ETB 


a 3 


Se toma el parametro MOD 4. Establece el 
modo de tinta para graficos: 

normal 

1 XOR 

2 AND 

3 OR 


&18 24 


CAN 




Intercambia las tintas de pluma y papel. 


&19 25 


EM 


a 255 
a 255 
a 255 
a 255 
a 255 
a 255 
a 255 
a 255 
a 255 


Define la matriz de un caracter definible por 
el usuario. Equivale a la orden SYMBOL. 
Lleva nueve parametros. El primero es el nii- 
mero del caracter; los ocho restantes, el dise- 
no del caracter. El bit mas significativo del 
primer byte corresponde al punto extremo su- 
perior izquierdo del caracter. El bit menos sig- 
nificativo del ultimo byte corresponde al pun- 
to extremo inferior derecho del caracter. 


&16 26 


SUB 


1 a 80 
1 a 80 

1 a 25 
1 a 25 


Define una ventana. Equivale a la orden 
WINDOW. Los dos primeros parametros es- 
pecifican los bordes izquierdo y derecho de la 
ventana; el menor de ellos se considera defini- 
torio del borde izquierdo. Los dos ultimos pa- 
rametros especifican los bordes superior e in- 
ferior de la ventana; el menor de ellos se con- 
sidera definitorio del borde superior. 


&1B 27 


ESC 




Sin efecto. Se lo ignora. 


&1C 28 


FS 


a 15 
a 31 
a 31 


Asigna dos colores a una tinta. Equivale a la 
orden INK. El primer parametro (MOD 16) 
especifica el numero de tinta; los dos siguien- 
tes (MOD 32), los colores deseados. (Los va- 
lores 27 a 31 no corresponden a colores 
definidos.) 


&1D 29 


GS 


a 31 
a 31 


Asigna dos colores al borde. Equivale a la or- 
den BORDER. Los dos parametros (MOD 32) 
especifican los colores. (Los valores 27 a 31 no 
corresponden a colores definidos.) 



Para su referencia . . . 
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Valor 


Nombre 


Parametro • Significado 


&1E 30 


RS 




Lleva el cursor al extremo superior izquierdo 
de la ventana. 


&1F 31 


US 


1 a 80 

1 a 25 


Lleva el cursor a la position especificada den- 
tro de la ventana actual. Equivale a la orden 
LOCATE. El primer parametro representa la 
columna; el segundo, la linea. 



Parte 2: El sistema operativo 



La gestion interna del CPC464 es realizada en tiempo real por un sofisticado sistema opera- 
tivo. El sistema operativo es una especie de 'guardia de trafico' que controla el flujo entre 
entradas y salidas. 

Su funcion primordial es servir de intermediario (interfaz) entre BASIC y los circuitos elec- 
tronicos. Por ejemplo, cuando el programa exige que parpadeen las tintas, BASIC entrega 
al sistema operativo los parametros y este realiza el trabajo. 

El sistema operativo de la maquina es lo que se suele denominar 'firmware'. Es un progra- 
ma grabado en ROM y comprende las rutinas en codigo de maquina que son invocadas por 
las ordenes de alto nivel de BASIC. 

Si se siente tentado a modificar el contenido de posiciones de memoria (con la orden POKE) 
o a invocar subrutinas del sistema operativo (con CALL), grabe el programa antes de que 
sea demasiado tarde. 

El firmware del sistema operativo del CPC464 esta descrito en la publication SOFT 158 y 
queda fuera del alcance de este manual. 

Si usted piensa programar en codigo de maquina, debe proveerse de un programa ensam- 
blador. El DEVPAC de AMSOFT incluye un ensamblador de Z80 reubicable, con editor, 
desensamblador y monitor. 
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Parte 3: Interrupciones 



El CPC464 utiliza ampliamente las interrupciones del Z80 para proporcionar un sistema 
operativo que incluye varias caracten'sticas multitarea, de las que son ejemplo las estructu- 
ras AFTER y EVERY descritas en otro lugar de este manual. El orden de prioridad de los 
temporizadores es el siguiente: 

Break ([escTesc]) (detention del programa) 

Temporizador 3 

Temporizador 2 (y las tres colas de sonido) 

Temporizador 1 

Temporizador 

Las interrupciones solo se deben programar despues de considerar las consecuencias de los 
posibles estados intermedios de las variables en el momento de la interruption. La subruti- 
na de interruption debe evitar interacciones indeseadas con el estado de las variables del 
programa principal. 

Las colas de sonidos tienen interrupciones independientes, de igual nivel de prioridad. Una 
vez iniciada una interruption de sonido, ya no puede ser interrumpida por otra de sonido. 
Este mecanismo permite que las rutinas de interruption de sonido puedan compartir varia- 
bles sin estar sujetas a los riesgos mencionados. 

Cuando se habilita una interruption de cola de sonido (con ON SQ GOSUB), la interrup- 
tion se realiza inmediatamente si la cola de sonido del canal correspondiente no esta llena; 
si lo esta, la interruption se producira cuando termine el sonido actual y quede espacio libre 
en la cola. La action de la interruption inhibe el suceso, de modo que la subrutina debe 
ser rehabilitada si se la va a utilizar mas tarde. 

Las acciones de enviar un sonido y de examinar el estado de la cola inhiben tambien la inte- 
rruption de sonido. 



Para su referenda 



4/7 



Parte 4: Caracteres ASCII y caracteres 
graficos en BASIC 

ASCII 

En la tabla siguiente se da la relation de los codigos y caracteres ASCII. Los numeros estan 
en decimal, octal y hexadecimal. En las siguientes paginas se ilustra el disefio de los caracte- 
res generados por el CPC464. 





DEC 


OCTAL 


HEX Caracteres ASCII 


DEC 


OCTAL 


HEX 


ASCII 


DEC 


OCTAL 


HEX 


ASCII 





000 


00 NUL ([CTRL]®) 


50 


062 


32 


2 


100 


144 


64 


d 


1 


001 


01 SOH ([CfRLlA) 


51 


063 


33 


3 


101 


145 


65 


e 


2 


002 


02 STX (I'CTRLjB) 


52 


064 


34 


4 


102 


146 


66 


f 


3 


003 


03 ETX (iCTRLlC) 


53 


065 


35 


5 


103 


147 


67 


g 


4 


004 


04 EOT ([CTRLlD) 


54 


066 


36 


6 


104 


150 


68 


h 


5 


005 


05 ENQ ([CTRLlE) 


55 


067 


37 


7 


105 


151 


69 




6 


006 


06 ACK (fCTRLJF) 


56 


070 


38 


8 


106 


152 


6A 


j 


7 


007 


07 BRL (jCTRLlGI 


57 


071 


39 


9 


107 


153 


6B 


k 


8 


010 


08 BS ([CTRLlm 


58 


072 


3A 




108 


154 


6C 




9 


011 


09 HT ([CTRL]!) 


59 


073 


3B 




109 


155 


6D 


m 


10 


012 


0A LF ([CTRLiJ) 


60 


074 


3C 


< 


110 


156 


6E 


n 


11 


013 


0B VT ([CTRLlK) 


61 


075 


3D 


- 


111 


157 


6E 





12 


014 


0C FF (ICTRLlL) 


62 


076 


3E 


> 


112 


160 


70 


p 


13 


015 


0D CR (IcfRLlM) 


63 


077 


3F 


? 


113 


161 


71 


q 


14 


016 


0E SO flCTRLjN) 


64 


100 


40 


® 


114 


162 


72 


r 


15 


017 


OF SI (|CTRL]0) 


65 


101 


41 


A 


115 


163 


73 


s 


16 


020 


10 DLE flCTTiLJP) 


66 


102 


42 


B 


116 


164 


74 


t 


17 


021 


11 DC1 ([CTRLiQ) 


67 


103 


43 


C 


117 


165 


75 


u 


18 


022 


12 DC2 ([CTRL]R) 


68 


104 


44 


D 


118 


166 


76 


V 


19 


023 


13 DC3 (|CTRL]S) 


69 


105 


45 


E 


119 


167 


77 


w 


20 


024 


14 DC4 (jCTRLTT) 


70 


106 


46 


F 


120 


170 


78 


X 


21 


025 


15 NAK ([CTRLlU) 


71 


107 


47 


G 


121 


171 


79 


y 


22 


026 


16 SYN ([CTRTJV) 


72 


110 


48 


H 


122 


172 


7A 


z 


23 


027 


17 ETB ([CTRJJW) 


73 


111 


49 


I 


123 


173 


7B 


{ 


24 


030 


18 CAN (LCTRTJX) 


74 


112 


4A 


J 


124 


174 


7C 




25 


031 


19 EM ([CTRLJY) 


75 


113 


4B 


K 


125 


175 


7D 


) 


26 


032 


1A SUB (|CTRL]Z) 


76 


114 


4C 


L 


126 


176 


7E 




27 


033 


IB ESC (ICTRLlt) 


77 


115 


4D 


M 










28 


034 


1C FS (!CTRLi\i 


78 


116 


4E 


N 










29 


035 


ID GS ([CTRL]]) 


79 


117 


4F 


O 










30 


036 


IE RS (CCTRLlT) 


80 


120 


50 


P 










31 


037 


IF US dCTRLJO) 


81 


121 


51 


Q 










32 


040 


20 SP 


82 


122 


52 


R 










33 


041 


21 ! 


83 


123 


53 


S 










34 


042 


22 " 


84 


124 


54 


T 










35 


043 


23 It 


85 


125 


55 


U 










36 


044 


24 $ 


86 


126 


56 


V 










37 


045 


25 % 


87 


127 


57 


w 










38 


046 


26 & 


88 


130 


58 


X 










39 


047 


27 ' 


89 


131 


59 


Y 










40 


050 


28 ( 


90 


132 


5A 


z 










41 


051 


29 ) 


91 


133 


5B 


[ 










42 


052 


2A * 


92 


134 


5C 


\ 










43 


053 


2B + 


93 


135 


5D 


1 










44 


054 


2C , 


94 


136 


5E 


t 










45 


055 


2D - 


95 


137 


5F 












46 


056 


2E . 


96 


140 


60 












47 


057 


2F / 


97 


141 


61 


a 










48 


060 


30 


98 


142 


62 


b 










49 


061 


31 1 


99 


143 


53 


c 
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Conjunto de caracteres graficos especificos de la 
maquina 



Los caracteres aqui reproducidos estan representados en la ma- 
triz estandar de 8x8 en la que se basa la visualization de texto 
en la pantalla del CPC464. Los caracteres definidos por el 
usuario pueden ser agrupados para conseguir efectos especia- 
les. Vease la section 'Caracteres definidos por el usuario' en el 
capi'tulo 'Cuando usted guste . . .'. 



zizflP::: 



m 



33 

&H21 

&X001 00001 




37 

&H25 

&X00100101 



B3 



41 

&H29 

&X00101001 



juuuuuz 



45 

&H2D 

&X00101101 



PJM. 



34 

&H22 

&X001 00010 




U 3SB 



38 

&H26 

&X00100110 



■■■■■ 



I 



42 

&H2A 

&X00101010 



m 



46 

&H2E 

&X00101110 



■■■■■ 
'■■■■ 

S3 




35 

&H23 

&X001 00011 



-JLM 



ju 



39 

&H27 

&X00100111 



I 



43 

&H2B 

&X00101011 




47 

&H2F 

&X001 01111 



32 &H20 
&X001 00000 



FS 






36 

&H24 

&X00100100 






40 

&H28 

&X00101000 



~r«Bn I I 



44 

&H2C 

&X00101100 



48 

&H30 

&X001 10000 
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m 



*w^ 




KE 



e£^ 



m 




WBSHE 



49 

&H31 

&X001 10001 



50 

&H32 

&X001 10010 



51 

&H33 

&X001 10011 



52 

&H34 

&X001 10100 



fiuuJl- 






mrrS 



Sf^ff 1 ^+ar =pr5F= 

iBSHbh :i_«i!ti _«SH_bii 



zJ««SS 



53 

&H35 

&X00110101 



54 

&H36 

&X00110110 



55 

&H37 

&X001 10111 



56 

&H38 

&X001 11000 






$ 



m 



:: 



.■■ 



Ik 



57 

&H39 

&X00111001 



58 

&H3A 

&X001 11010 



59 

&H3B 

&X00111011 



60 

&H3C 

&X00111100 



fFTFFPE 



WWW 



BfH 

— ZLIP — 



p~l 



rmiJI 

flHBFBS- 



:rm 



fflffl 



61 

&H3D 

&X00111101 



62 

&H3E 

&X00111110 



63 

&H3F 

&X001 11111 



64 

&H40 

&X01 000000 







E TFi 



ffffiffl E 



Ft 



if- 






i »fl»^ 



nrJ= 



65 

&H41 

&X01 000001 



66 

&H42 

&X01 000010 



67 

&H43 

&X01 000011 



68 

&H44 

&X01000100 
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69 

&H45 

&X01000101 




70 

&H46 

&X01000110 





71 

&H47 

&X01000111 



72 

&H48 

&X01001000 



1 



WWffi 



73 

&H49 

&X01001001 



JB 



m 




77 

&H4D 

&X01001101 




74 

&H4A 

&X01001010 



sac 
ruzzz 



H 



78 

&H4E 

&X01001110 



ES 







H 



Wff-W 



75 

&H4B 

&X01001011 




76 

&H4C 

&X01001100 



ens 




79 

&H4F 

&X01 001111 



80 

&H50 

&X01010000 






81 

&H51 

&X01010001 




82 

&H52 

&X01010010 






m 

TFPPhT 



83 

&H53 

&X01010011 



84 

&H54 

&X01010100 




85 

&H55 

&X01010101 




86 

&H56 

&X01010110 



■§l ■ 

■gj _■ 

■■■■■■ 

■ilCl" 



ffl 



EFMJfg 



87 

&H57 

&X01010111 



88 

&H58 

&X01011000 
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as?I 



fflffl 





1 



■■■CH 

HE 



89 

&H59 

&X01011001 



90 

&H5A 

&X01011010 



91 

&H5B 

&X01011011 



92 

&H5C 

&X01011100 




fflH 



FSHSB 

mm. 



m 



m 



93 

&H5D 

&X01011101 



94 

&H5E 

&X01011110 



95 

&H5F 

&X01011111 



96 

&H60 

&X01 100000 



' IM""-,-. 




mi 



J¥rs 

■iff" 



97 

&H61 

&X01 100001 



98 

&H62 

&X01 100010 



99 

&H63 
&X01 100011 



100 

&H64 

&X01100100 



I N M I N I 






BG6 



III 



-Ji"l) 

3ESS 



fflB 






F:^§ 




101 

&H65 

&X01100101 



102 

&H66 

&X01100110 



103 

&H67 

&X01100111 



104 

&H68 

&X01 101000 






EB 



ffl 







105 

&H69 

&X01101001 



106 

&H6A 

&X01101010 



107 

&H6B 

&X01101011 



108 

&H6C 

&X01101100 
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mm 




109 

&H6D 

&X01101101 



m 




SB 



110 

&H6E 

&X01101110 



Hzhm+H 



111 

&H6F 
&X01101111 



1 1 JJ 1 1 M l 
ME 

fkw 



9Q 



112 

&H70 

&X01110000 



B 



LllTbb _ 
rti ■■■■ 



113 

&H71 

&X01 110001 



EH 



i§ 



114 

&H72 

&X01110010 



ran 



w^r 



115 
&H73 
&X01 110011 



BBS 



116 

&H74 

&X01110100 




117 
&H75 
&X01 110101 



ftp- 

IS 



118 

&H76 

&X01110110 







119 

&H77 

&X01110111 



PS 



120 

&H78 

&X01111000 



n 



W 



121 

&H79 

&X01111001 



Up 



fl£ 



125 

&H7D 

&X01111101 



iwi^ 



i£S 



hbhbB 



122 

&H7A 

&X01111010 



■1 Ml 



126 

&H7E 

&X01111110 



HI 



123 
&H7B 
&X0111 1011 



n 



127 
&H7F 
&X01 111111 



ss 



124 

&H7C 

&X01111100 



128 

&H80 

&X1 0000000 
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■HI 


■■■■ 


■■■■ 


■■■■ 











■■■ 

!■■ 



■■■I 



■■■■■■■I 









■■■■ 








■■■■ 








■■■■ 








■ ■■I 



























































■■■■■■■■ 



uu 











■■■■ 










■■■■ 










■■■■ 










I 


I 


I 


I 


■■■ 


■ 








■■■ 


■ 










■■■ 


■ 










■ 


■ 


■ 


■ 











■■■§■ 
■■■■_ 






■ 


■■■■: 








■■■si 








■■■■i 















■■■■ 








■■■■ 








■■■■ 


■ 
■ 
■ 
■ 


■ 
■ 
■ 
■ 


■ 
■ 
■ 
■ 


■■■■ 
■■■■■ 
■■■■■ 
■■■■■ 
■■■■■ 



■■■■■■■I 



129 


130 


131 


132 


&H81 


&H82 


&H83 


&H84 


&X1 0000001 


&X1 0000010 


&X1 0000011 


&X1 00001 00 



133 


134 


135 


136 


&H85 


&H86 


&H87 


&H88 


&X1 00001 01 


&X1 00001 10 


&X1 00001 11 


&X1 0001 000 




137 


138 


139 


140 


&H89 


&H8A 


&H8B 


&H8C 


&X1 0001 001 


&X10001010 


&X1 0001 011 


&X1 0001 100 









■■ 


■ 1 









141 


142 


143 


144 


&H8D 


&H8E 


&H8F 


&H90 


&X10001101 


&X10001110 


&X10001111 


&X1 001 0000 





■ 
■ 
■ 
■ 










■ 








■ 








■ 










I 


1 



















































145 

&H91 

&X1 001 0001 







■■■■■■ 
mill 









146 

&H92 

&X1 001 0010 



rrT"tfm 


■§: 


■■ 

^■■■■1 
■111 









147 

&H93 

&X10010011 



S 



148 

&H94 

&X10010100 
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149 

&H95 

&X10010101 



H 



150 

&H96 

&X10010110 



m 



151 

&H97 

&X10010111 



iiui 



S3:: 



152 

&H98 

&X1 001 1000 



PES 



juuv 



153 

&H99 

&X10011001 



ffffllff 



154 

&H9A 

&X10011010 



m 



■MJUUUM1 



155 

&H9B 

&X10011011 







I 














I 














I 










■ ■■■ 










■ ■■■ 


■ 












_■ 
■ 
■ 



















156 

&H9C 

&X10011100 



FrrB'B: 

■■■■■ . 




157 

&H9D 

&X10011101 



158 

&H9E 

&X10011110 



fflpg 



m m 



159 

&H9F 

&X10011111 



■ 



160 

&HA0 

&X1 01 00000 




161 

&HA1 

&X1 01 00001 



162 

&HA2 

&X10100010 



IH 



■■*■ 



11 



163 

&HA3 

&X1 01 00011 




164 

&HA4 

&X10100100 



rmmm 


■■ 


■ 




■::; 

:_■■ 
__■■ 


■ 
■ 
■ 
■ 
■ 
■ 








r 







165 

&HA5 

&X10100101 






CS 



BB 



m 



166 

&HA6 

&X10100110 



= ^ff== 













167 

&HA7 

&X10100111 




168 

&HA8 

&X10101000 
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169 

&HA9 

&X10101001 



HS 






■■ ■■■ _ 



^ffi 




170 

&HAA 

&X10101010 



171 

&HAB 

&X10101011 



172 

&HAC 

&X10101100 




173 

&HAD 

&X10101101 



H 



::Jf 



ffl 



174 

&HAE 

&X10101110 



175 

&HAF 

&X10101111 




176 

&HB0 

&X1 01 10000 




SSFFFbe 



177 

&HB1 

&X1 01 10001 



^■ffFff 



irffl 



Si 



178 

&HB2 

&X10110010 



179 

&HB3 

&X10110011 



aR?: 



sSs 



180 

&HB4 

&X10110100 




181 

&HB5 

&X10110101 






B 



:3¥ 

MM 



IB 



182 

&HB6 

&X10110110 



183 

&HB7 

&X10110111 




184 

&HB8 

&X10111000 



I 



■8%L 

L 6g 



185 
&HB9 
&X101 11001 




m 



186 

&HBA 

&X10111010 



187 

&HBB 

&X10111011 




188 

&HBC 

&X10111100 
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189 

&HBD 

&X10111101 




19C 

£n6E 

&X10111110 



FSWa 



Ess 



shs 



191 

&HBF 

&X10111111 



ru 






I 



192 

&HCO 

&X1 1000000 



m 



193 

&HC1 

&X1 1000001 



194 

&HC2 

&X1 1000010 



■infl Frr ■ 



195 

&HC3 

&X1 1000011 



M 



I 



196 

&HC4 

&X1 10001 00 




197 

&HC5 

&X1 10001 01 



ifiniJK FT" 1 

+T8aH-i-i ttD 



198 

&HC6 

&X1 10001 10 



a 






199 

&HC7 

&X1 10001 11 



s 



.!■ 



a 



200 

&HC8 

&X1 1001 000 



ffl 



s 



201 

&HC9 

&X1 1001 001 



■^"rrrBi 

MITIU 

■H-U4-4-"H ££■■■»-- 

zawrwSC r«iJUiBr^ 



:: 



202 

&HCA 

&X11001010 



203 

&HCB 

&X11001011 



11 



204; 

&HCC 

&X1 1001 100 



■ff l"H4-"BT 


MTjWT 




■■ HPLM' 


-P"! pr^Bir^ 1 


im rr"ix"" 



205 

&HCD 

&X11001101 



206 

&HCE 

&X11001110 




207 

&HCF 

&X11001111 



X 



208 

&HD0 

&X1 1010000 
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209 

&HD1 

&X11010001 



■■ 










■■ 










■■ 










■■ 










■■ 










■■ 










■■ 










■■ 











210 

&HD2 

&X11010010 



211 

&HD3 

&X1 1010011 



m 




212 

&HD4 

&X11010100 



■■■■■■■■ 
■■■■■■■ 
!"■■■■■■ 
- Xpn 

lis 



213 

&HD5 

&X11010101 



J ■■ 

■■■ 

__J ■■■■ 
_J ■■■■■ 

Ztmhh 

■■■■■■■ 
■■■■■■■■ 



* — 












■■ 












■■■ 












■■■■■ 
■■■■■ 
■■■■■ 


■ 










■■■ 
■■■ 


■■ 



214 

&HD6 

&X11010110 



215 

&HD7 

&X11010111 



m 



216 

&HD8 

&X1 101 1000 




217 

&HD9 

&X11011001 



■ 



218 

&HDA 

&X11011010 




219 

&HDB 

&X11011011 




220 

&HDC 

&X11011100 




221 

&HDD 

&X11011101 




222 

&HDE 

&X11011110 




223 

&HDF 

&X11011111 



""mmmmaTT 

mm 

sssrs 

mwrrrram 

■■■■■■■I 



224 

&HE0 

&X1 1100000 



("■■■■■■ 

mm 



225 

&HE1 

&X1 1100001 



■■■■■■■I 
■■■■■■■ 



226 

&HE2 

&X11100010 




227 

&HE3 

&X1 1100011 




228 

&HE4 

&X1 1100100 
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IS 



fflfi 




esse] 

■■■■■■■■ 




229 

&HE5 

&X11100101 



230 

&HE6 

&X11100110 



231 

&HE7 

&X1 11001 11 



232 

&HE8 

&X11101000 




it* 

SB 



Us 




■ 



!H33 



233 

&HE9 

&X11101001 



234 

&HEA 

&X11101010 



235 

&HEB 

&X11101011 



236 

&HEC 

&X11101100 





£2£ 



■■■■■■■ 

HI 



237 
&HED 
&X11 101 101 



238 

&HEE 

&X11101110 



239 
&HEF 
&X11 101 1 11 



240 

&HF0 

&X1 11 10000 



PH ^ s 

TTliTT ■■■■! 



mm 




m 



m 

!■■■■■■■■ 



241 

&HF1 

&X1 11 10001 



242 

&HF2 

&X11110010 



243 

&HF3 

&X11110011 



244 

&HF4 

&X1 11 10100 




■■■■■ 



■■■■!■■_ 
■■■JUL__ 

^ n mm 



K 



TT 



!■■■■■■ 

r"r"S! 







245 

&HF5 

&X11110101 



246 

&HF6 

&X11110110 



247 

&HF7 

&X11110111 



248 

&HF8 

&X1 1111 000 



Para su referenda 



4/19 




249 

&HF9 

&X11111001 





250 

&HFA 

&X11111010 



251 

&HFB 

&X11111011 






■■■■:: 



252 

&HFC 

&X11111100 



W™ 



s 



253 

&HFD 

&X11111101 



3lE 



mm 

Si 



254 

&HFE 

&X11111110 



255 
&HFF 
&X11 111111 
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Parte 5: Esquemas del teclado 

Valores ASCII implicitos generados por las 
teclas (HEX) 

UUUUUUUUUUUUL1L1UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU1 



AMSTRAD 



CPC464 

























ESC 




AF 
21 

31 




7E 
22 
32 


3 
3 


•3 
3 


24 
34 




25 
35 




26 

36 




27 
37 




7B 
28 
38 




29 
39 




1F 
5F 
30 




3D 
2D 




IE 
A3 

5E 




LU 


1 I 






















E1 
09 
09 




51 
71 


17 
57 
77 


OS 
45 
66 


12 
52 
72 


14 
54 
74 


19 
59 
79 


15 
56 

75 


09 
49 
89 


OF 
4F 
6F 


10 
50 
TO 


OO 
7C 
40 


1B 
2A 
5B 


1 OD 














OD 




FIJA 
MAYS 


01 
41 
61 


13 
53 
73 


04 
44 
64 


06 
46 
66 


07 
47 
67 


09 
48 
68 


OA 
4A 
6A 


OB 
4B 
6B 


OC 
4C 
6C 


A1 
AB 


3A 
3B 


ID 
2B 
5D 
















MAYS 




1A 
5A 
7A 


5B 
7B 




OS 
43 
63 




16 
56 
76 




02 
42 
62 




OE 
4E 
6E 




OD 
4D 
6D 




3C 
2C 




3E 
2E 




AE 
3F 
2F 




1C 
60 
SC 




MAYS 
























20 
20 




:trl 















FA EO FB 

F6 EO 

F2 EO 






000 


000 


000 


05 



JOYSTICK 



JOYSTICK 1 







OB 
OB 










26 
36 






















08 
08 


DISP.1 
58 
58 


DISP.2 
5A 
5A 




09 
09 




12 
52 
72 


DISP.1 

07 
47 
67 


DISP.2 

06 
46 
66 


14 
54 
74 






















OA 
OA 










25 
35 
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Codigos expansibles: posiciones y valores 
implicitos 



j™iMJlTdm r JlIWiJFuWJlMJ^^^^ 



AMSTRAD 



CPC4B4Eai 



smmmmsmmmmsLum^E 

0Q00BEI; 
I0S0000000B10II1 
00000000000[ 



FIJA 
MAYS 



MAYS 



m 

000 

m 



Codigo 
expansible 


Asignacion implfcita ! 


Caracter 


Valor ASCII 


0(128) 

1(129) 

2(130) 

3(131) 

4(132) 

5(133) 

6(134) 

7(135) 

8(136) 

9(137) 

10(138) 

11(139) 

12(140) 



1 

2 
3 
4 
5 
6 
7 
8 
9 


&30 
&31 
&32 
&33 
&34 
&35 
&36 
&37 
&38 
&39 
&2E 
&0D 
&52&55&4E&22&0D 


]lNTRO| 


RUN" INTRO i 


Nota. Los caracteres expansibles 13 a 31 (141 a 159) no tie- 
nen asignada ninguna cadena de expansion. Su expansion 
se puede definir con la orden KEY de BASIC, y se los pue- 
de asignar a teclas concretas con la orden KEY DEF. 
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Niimeros de las teclas y los joysticks 



niiMMJimnjimjiMnmMJiimm^ 



AMSTRAD 



CPC464 



66 



64 



65 



57 



56 



49 



48 



41 



40 



33 



32 



25 



24 



THHU 



QUI E3 

r™~iE9i 



59 



58 



50 



51 



43 



42 



35 



34 



27 



26 



60 



61 



53 



52 



44 



45 



37 



36 



29 



28 



17 1 

19 


18 



71 



63 



62 



55 



54 



46 



38 



39 



47 



31 



30 



22 



21 



23 




JOYSTICK 



JOYSTICK 1 









72 










48 
























74 




| 
DISP.1 

76 


DISP.2 
77 


75 




50 




DISP.1 
52 


DISP.2 
53 


51 


























73 










49 
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Parte 6: Sonidos 
Notas y periodos de tono 

La tabla siguiente da los valores recomendados para el parametro <periodo de tono> co- 
rrespondientes a los tonos y semitonos de las ocho octavas que puede producir el CPC464. 

Las frecuencias generadas no coinciden exactamente con las requeridas porque el <periodo 
de tono) tiene que ser un numero entero. El 'error relativo' es el cociente: 

frecuencia requerida-frecuencia generada 



frecuencia requerida 



expresado en porcentaje. 



NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 


C 


DO 


32.703 


3822 


-0.007% 




C*t 


DO** 


34.648 


3603 


+0.007% 




D 


RE 


36.7.08 


34.05 


-0 . 007% 




E*t 


RE# 


38.391 


3214 


-0.004% 




E 


MI 


41.203 


3034 


+0.009% 




F 


FA 


43.654 


2863 


-0.016% 




Ft* 


FA# 


46.249 


2703 


+0.009% 


Octava -3 


G 


SOL 


48.999 


2551 


-0.002% 




G# 


SOL** 


51.913 


2408 


+0.005% 




A 


LA 


55.000 


2273 


+0.012% 




A** 


LA** 


58.270 


2145 


-0 . 008% 




S 


SI 


61.735 


2025 


+0.011% 




NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 


C 


DO 


65.406 


1911 


-0.007% 




C# 


DO** 


69.296 


1804 


.0.007% 




D 


RE 


73.416 


1703 


+0.022% 




D** 


RE** 


77.782 


1607 


-0.004% 




cr 


MI 


82.407 


1517 


+0.009% 




F 


FA 


87.307 


1432 


+0.019% 




F** 


FA** 


92.499 


1351 


-0.028% 


Octava -2 


3 


SOL 


97.999 


1276 


+0.037% 




G# 


SOL** 


103.826 


1204 


+0.005% 




A 


LA 


110.000 


1136 


-0.032% 




A* 


LA** 


116.541 


1073 


+0.039% 




B 


SI 


123.471 


1012 


-0.038% 
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3 



NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 


C DO 


130.813 


956 


+0.046% 


C« DO** 


138.591 


902 


+0.007% 


D RE 


146.832 


851 


-0.037% 


Dt* RE** 


155.564 


804 


+0.058% 


E MI 


164.814 


758 


-0.057% 


F FA 


174.614 


716 


+0.019% 


Ft* FA# 


184.99? 


676 


+0.046% Octava -1 


G SOL 


195.998 


633 


+0.037% 


G# SOL** 


207.652 


602 


+0.005% 


A LA 


220.i3.0i3 


568 


-0.032% 


A** LAt* 


233.082 


536 


-0.055% 


B SI 


246.942 


506 


-0.038% 


NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 


C DO 


261.626 


478 


+0.046% DO media 


C# DO** 


277. 183 


451 


+0.007% 


D RE 


293.665 


426 


+0.081% 


D**' REt* 


311. 127 


402 


+0.058% 


E MI 


329.628 


379 


-0.057% 


F FA 


349.228 


358 


+0.019% 


Ft* FAt* 


369.994 


338 


+0.046% Octava 


G SOL 


391.995 


319 


+0.037% 


Gt* SOLt* 


415.305 


301 


+0.005% 


A LA 


440.000 


284 


-0.032% LA international 


At* LAt* 


466. 164 


268 


-0.055% 


B SI 


493.883 


253 


-0.038% 


NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 


C DO 


523.251 


239 


+0.046% 


C** DO** 


554.365 


225 


-0.215% 


D RE 


587.330 


213 


+0.081% 


Dt* REt* 


622.254 


201 


+0.058% 


E MI 


659.255 


190 


+0.206% 


F FA 


698.457 


179 


+0.019% 


F# FA# 


739.989 


169 


+0.046% Octava 1 


G SOL 


783.991 


159 


-0.277% 


G# SOL# 


830.609 


150 


-0.328% 


A LA 


880.000 


142 


-0.032% 


A# LA# 


932.328 


134 


-0.055% 


B SI 


987.767 


127 


+0.356% 



Para su referencia 



4/25 



NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 




C DO 


104 £.502 


119 


-0. 3; ! 47. 




Ctt DO** 


11. as. 731 


:i3 


+0.229% 




E RE 


1 174. 6 5 9 


106 


-0.390% 




D*> REtt 


1Z4 i . S.G8 


100 


-tf .441% 




r ,v t 


131S. 510 


V D 


+0.206% 




F 7A 


1396. 913 


89 


-0.543% 




Ft* FA** 


j. 4,- r . 7/6 


84 


-0.548% Octava 


2 


G SOL 


1567. 9S2 


80 


+0.350% 




G** SOL** 


1661.219 


75 


-0.328% 




A LA 


1760.000 


71 


-0.032% 




At* LA** 


1864.655 


67 


-0.055% 




B SI 


1975. 533 


63 


-0.435% 




NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 




C DO 


2093.004 


60 


+0. 4 62% 




Ctt DC** 


2217.461 


56 


-0.662% 




D RE 


2349. 31S 


53 


-0.390% 




Dfc RE** 


2489.016 


50 


-0.441% 




E MI 


2637.021 


47 


-0.855% 




F FA 


2793. 826 


45 


+0.574% 




F** FA** 


2959.955 


42 


-0.548% Octava 


3 


G SOL 


3135.963 


40 


+0.450% 




G** SOL** 


3322.438 


38 


+0.992% 




A LA 


3520.000 


36 


+ 1 .357% 




A** LA** 


3729.310 


34 


+1.41 7% 




B SI 


3951.066 


32 


+1. 134% 




NOTA 


FRECUENCIA 


PERIODO 


ERROR RELATIVO 




C DO 


4186.009 


30 


+0.462% 




C** DO** 


4434.922 


28 


-0.662% 




D RE 


4698.636 


27 


+1.469% 




D8 RE** 


4978.032 


25 


-0.441% 




E MI 


5274.041 


24 


+ 1 .246% 




F FA 


5537.652 


22 


-1.685% 




F** FA** 


5919.911 


21 


-0.548% Octava 


4 


G SOL 


6271.927 


20 


+0.350% 




G** SOL** 


6644.875 


19 


+0.992% 




A LA 


7040.000 


18 


+1.357% 




At* LA** 


7458.621 


17 


+1.417% 




B SI 


7902. 133 


16 


+1. 134% 
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Estas frecuencias han sido calculadas a partir de la correspondiente a la nota LA internatio- 
nal mediante la siguiente formula: 

FRECUENCIA=440*{2T{OCTAVA + {(N-10)/12))) 
PERIODO=ROUND(125000/FRECUENCIA) 

donde N es 1 para DO, 2 para DO#, etc. 
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Parte 7: Mensajes de error de BASIC 



1 Unexpected NEXT 

Se ha encontrado un NEXT que no corresponde a ningiin FOR, o bien la variable menciona- 
da tras NEXT no coincide con la de FOR. 

2 Syntax error 

BASIC no puede entender la linea porque algo en ella no se ajusta a las reglas de sintaxis 
del lenguaje. 

3 Unexpected RETURN 

Se ha encontrado una orden RETURN fuera de una subrutina. 

4 DATA exhausted 

Una orden READ ha intentado leer mas datos de los incluidos en lineas DATA. 

5 Improper argument 

Este es un error no especifico. Puede haber algo incorrecto en el argumento de una funcion 
o en un parametro de una orden. 

6 Overflow 

El resultado de una operation aritmetica ha sobrepasado los margenes aceptables. Si ha 
ocurrido en un numero en punto flotante, el resultado ha sido mayor que 1.7E+38 
(aprox.). Tambien puede haber ocurrido al intentar convertir un numero en punto flotante 
en un entero con signo de 16 bits. 

7 Memory full 

El programa actual o sus variables ocupan demasido espacio en la memoria, el anidamiento 
de la estructura de control es demasiado profundo (demasiadas ordenes GOSUB, WHILE 
o FOR anidadas). 

La orden MEMORY provoca este error si se intenta situar el limite de la memoria accesible 
a BASIC demasiado bajo, o tan alto que sea imposible. Observese que los ficheros abiertos 
tienen un tampon dedicado a ellos, lo que puede restringir los valores correctos de 
MEMORY. 
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8 Line does not exist 

Se ha mencionado un niimero de linea que no existe en el programa. 

9 Subscript out of range 

Uno de los subfndices mencionados en una lista es demasiado pequeflo o demasiado grande. 

10 Array already dimensioned 

Una de las listas declaradas en una orden DIM ya ha sido dimenslonada antes. 

11 Division by zero 

Division por cero, que puede ocurrir en la division de niimeros reales, en la division entera, 
en la operation MOD y en la exponentiation. 

12 Invalid direct command 

Se ha intentado dar como orden directa una orden que solo es valida si va precedida de un 
niimero de linea. 

13 Type mismatch 

Incongruencia de tipos. Un dato es literal cuando tenia que ser numerico, o viceversa, o 
se ha introducido un dato no numerico en READ o INPUT. 

14 String space full 

Se han creado demasiadas cadenas literales y ya no hay espacio disponible para mas, inclu- 
so despues de reorganizar la memoria. 

15 String too long 

Una cadena literal consta de mas de 255 caracteres. Puede haber sido generada por concate- 
nation de otras. 

16 String expression too complex 

Expresion literal demasiado compleja. Las expresiones literales pueden generar valores in- 
termedios; cuando el niimero de estos valores excede de un limite razonable, se produce este 
error. 

17 Cannot CONTinue 

No se puede reanudar la ejecucion del programa con CONT. Observese que CONT reanuda 
el programa despues de una instruction STOP, de [esc] ESC o de un error, pero a condi- 
tion de que no se modifique el programa durante la pausa. 
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18 Unknown user function 

Se ha invocado una FN sin la correspondiente DEF FN. 

19 RESUME missing 

Se ha llegado al final del programa mientras se ejecutaba una rutina de gestion de errores 
(esto es, una rutina invocada por ON ERROR GOTO). 

20 Unexpected RESUME 

RESUME solo es valida en una rutina de gestion de errores (esto es, en una rutina invocada 
por ON ERROR GOTO). 

21 Direct command found 

Al cargar un fichero se ha encontrado una li'nea sin numero de lfnea. 

22 Operand missing 

BASIC ha encontrado una expresion incompleta. 

23 Line too long 

BASIC ha convertido a su forma interna una linea y esta ha resultado ser demasiado larga. 

24 EOF met 

Se ha intentado leer mas alia del final del fichero de entrada. 

25 File type error 

El fichero que se ha leido no es del tipo adecuado. OPEN IN solo puede abrir ficheros de 
texto ASCII. Analogamente, LOAD, RUN, etc., solamente pueden acceder a ficheros crea- 
dos por SAVE. 

26 NEXT missing 

BASIC ha encontrado un FOR al que no corresponde ningun NEXT. La linea mencionada 
tras el mensaje es aquella en la que se encuentra el FOR. 

27 File already open 

Se ha ejecutado una orden OPENIN u OPENOUT sin previamente cerrar el fichero que es- 
taba abierto. 

28 Unknown command 

BASIC no encuentra un comando externo que corresponda a lo que se ha escrito tras ! . 
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29 WEND missing 

BASIC ha encontrado un WHILE al que no corresponde ningiin WEND. 

30 Unexpected WEND 

Se ha encontrado un WEND que no corresponde a ningiin WHILE, o bien el WEND no 
concuerda con el WHILE del bucle actual. 



Parte 8: Palabras reservadas de BASIC 

A continuation damos la lista de las palabras reservadas para el BASIC de AMSTRAD, 
las cuales, por consiguiente, no pueden ser utilizadas como nombres de variables. 

ABS, AFTER, AND, ASC, ATN, AUTO 

BIN$, BORDER 

CALL, CAT, CHAIN, CHR$, CINT, CLEAR, CLG, CLOSEIN, CLOSEOUT, CLS, 

CONT, COS, CREAL 

DATA, DEF, DEFINT, DEFREAL, DEFSTR, DEG, DELETE, Dl, DIM, DRAW, DRAWR 

EDIT, El, ELSE, END, ENT, ENV, EOF, ERASE, ERL, ERR, ERROR, EVERY, EXP 

FIX, FN, FOR, FRE 

GOSUB, GOTO 

HEX$, HIMEM 

IF, INK, INKEY, INKEY$, INP, INPUT, INSTR, INT 

JOY 

KEY 

LEFT$, LEN, LET, LINE, LIST, LOAD, LOCATE, LOG, LOG10, LOWER$ 

MAX, MEMORY, MERGE, MID$, MIN, MOD, MODE, MOVE, MOVER 

NEXT, NEW, NOT 

ON, ON BREAK, ON ERROR GOTO 0, ON SQ, OPENIN, OPENOUT, OR, ORIGIN, 

OUT 
PAPER, PEEK, PEN, PI, PLOT, PLOTR, POKE, POS, PRINT 
RAD, RANDOMIZE, READ, RELEASE, REM, REMAIN, RENUM, RESTORE, 

RESUME, RETURN, RIGHT$, RND, ROUND, RUN 
SAVE, SGN, SIN, SOUND, SPACE$, SPC, SPEED, SQ, SQR, STEP, STOP, STR$, 

STRING$, SWAP, SYMBOL 
TAB, TAG, TAGOFF, TAN, TEST, TESTR, THEN, TIME, TO, TROFF, TRON 
UNT, UPPER$, USING 
VAL, VPOS 

WAIT, WEND, WHILE, WIDTH, WINDOW, WRITE 
XOR, XPOS 
YPOS 
ZONE 
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Parte 9: Plantfflas 

Pantalla de texto; modo (20 columnas) 



8 
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Pantalla de texto; modo 1 (40 columnas) 
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Pantalla de texto; modo 2 (80 columnas) 
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Envolventes de sonido/miisica 







(C ifl 



00 01 o 



Parte 10: Conexiones 

Zocalos de entradas y salidas del CPC464 




ESTEREO 

PUERTA DE USUARIO 
IMPRESORA 



5V c.c. 



MONITOR 



Zocalo del joystick 



VISTO POR DETRAS 











Patilla 1 ARRIBA 
Patilla 2 ABAJO 
Patilla 3 IZQUIERDA 
Patilla 4 DERECHA 
Patilla 5 N/C 



Patilla 6 DISPARO 2 
Patilla 7 DISPARO 1 
Patilla 8 MASA 2 
Patilla 9 MASA 
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Zocalo del monitor 



VISTO POR DETRAS 




Patilla 1 ROJO 
Patiila 2 VERDE 
Patilla 3 AZUL 



5 1 

6 
4 2 

3 



Patilla 4 SINC 
Patilla 5 MASA 
Patilla 6 LUM 



Zocalo estereo 



C 



IX) 



A_ 



V 



IZQUIERDO 

DERECHO 

MASA 



MASA IZQUIERDO 



Patilla 1 CANAL IZQUIERDO 
Patilla 2 CANAL DERECHO 
Patilla 3 MASA 
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Zocalo de unidad de disco 



VISTO POR DETRAS 
49 47 45 43 41 39 37 35 33 31 29 27 25 23 21 19 17 15 13 11 



7 5 3 1 



^ 



SO 48 46 44 42 40 38 38 34 32 30 28 26 24 22 20 18 16 14 12 10 8 6 4 2 



Patilla 


1 SONIDO 


Patilla 18 


Patilla 


2 MASA 


Patilla 19 


Patilla 


3 A15 


Patilla 20 


Patilla 


4 A14 


Patilla 21 


Patilla 


5 A13 


Patilla 22 


Patilla 


6 A12 


Patilla 23 


Patilla 


7 All 


Patilla 24 


Patilla 


8 A10 


Patilla 25 


Patilla 


9 A9 


Patilla 26 


Patilla 10 A8 


Patilla 27 


Patilla 11 A7 


Patilla 28 


Patilla 12 A6 


Patilla 29 


Patilla 13 A5 


Patilla 30 


Patilla 


14 A4 


Patilla 3 1 


Patilla 


15 A3 


Patilla 32 


Patilla 


16 A2 


Patilla 33 


Patilla 


17 Al 


Patilla 34 



AO 

D7 

D6 

D5 

D4 

D3 

D2 

Dl 

DO 

+ 5v 

MREQ 

Ml 

RFSH 

IORQ 

RD 

WR 

HALT 



Patilla 35 
Patilla 36 
Patilla 37 
Patilla 38 
Patilla 39 
Patilla 40 
Patilla 41 
Patilla 42 
Patilla 43 
Patilla 44 
Patilla 45 
Patilla 46 
Patilla 47 
Patilla 48 
Patilla 49 
Patilla 50 



INT 

NMJ 

BUSR2 

BUSAK 

READY 

BUS RESET 

RESET 

ROMEN 

ROMD1S 



RAMRD 

RAMDIS 

CURSOR 

LAP1Z OPTICO 

EXP 

MASA 



Zocalo para la impresora 



VISTO POR DETRAS 

17 16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



^^^: 



35 34 33 32 31 30 29 26 27 26 26 24 23 22 21 20 19 



Patilla 


1 


STROBE 


Patilla 


2 


DO 


Patilla 


3 


Dl 


Patilla 


4 


D2 


Patilla 


5 


D3 


Patilla 


6 


D4 


Patilla 


7 


D5 


Patilla 


8 


D6 


Patilla 


9 


MASA 


Patilla 11 


BUSY 


Patilla 14 


MASA 


Patilla 16 


MASA 



Patilla 19 
Patilla 20 
Patilla 21 
Patilla 22 
Patilla 23 
Patilla 24 
Patilla 25 
Patilla 26 
Patilla 27 
Patilla 28 
Patilla 33 
Todas las 



MASA 
MASA 
MASA 
MASA 
MASA 
MASA 
MASA 
MASA 
MASA 
MASA 
MASA 
demas: N/C 
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Parte 11: Impresoras 
Interfaz 



Al CPC464 se le puede conectar cualquier impresora que tenga 'interfaz paralelo tipo Cen- 
tronics' de 7 bits. 

El cable es facil de construir, pues no tiene que realizar mas que una conexion biunfvoca 
entre el zocalo IMPRESORA del ordenador y el conector de la impresora. Notese que en 
la salida del ordenador hay dos terminales menos que en el conector de la impresora, con 
objeto de permitir la utilization de un conector estandar para circuito impreso. 

Los detalles de las patillas del interfaz estan ilustrados en la parte 9 de este capitulo. 

El cable debe conectar el terminal 1 del ordenador con el 1 de la impresora, el 19 del ordena- 
dor con el 19 de la impresora, etc. Sin embargo, los terminales 18 y 36 de la impresora no 
deben ser conectados al ordenador. Observese que aunque los terminales de la fila superior 
del zocalo IMPRESORA del ordenador estan numerados del 1 al 17, la numeration de la 
fila inferior empieza en el 19, no en el 18, para mantener la correspondencia con el conector 
de la impresora. 

El ordenador utiliza la serial BUSY (patilla 11) para sincronizar con la impresora y espera 
cuando esta esta en fuera de linea. 

No es necesario enviar a la impresora codigos de preparation; la salida del ordenador se 
dirige a la impresora especificando el canal #8. 

La salida IMPRESORA esta disenada para conectar impresoras de matriz de puntos de ba- 
jo costo. No obstante, con el interfaz adecuado, se le pueden conectar impresoras de marga- 
rita, plotters e impresoras de color por chorro de tinta. La compatibilidad esta asegurada 
por el interfaz paralelo. 

La programacion incorporada a la impresora AMSTRAD DMP 1 facilita el funcionamiento 
en modo grafico asi como los volcados de pantalla. 
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Parte 12: Joysticks 



El ordenador puede funcionar con uno o dos joysticks. La maquina los considera como 
parte del teclado, y por consiguiente su estado se puede determinar con INKEY e INKEY$. 

Notese que en la mayor parte de los casos, el boton principal de disparo del joystick es inter- 
pretado como 'DISP.2' por el CPC464. 

Las funciones JOY(O) y JOY(1) permiten inspeccionar directamente los dos joysticks. Cada 
una de estas funciones genera un resultado, interpretable bit a bit, que informa de la situa- 
tion de los interruptores del joystick en el momento en que se realizo la ultima comproba- 
cion del teclado. 

La tabla siguiente indica los valores generados por los dos joysticks. Ademas de los niime- 
ros de la funcion JOY, se incluyen los numeros que se deben utilizar en instrucciones que 
llevan como parametro los numeros de las teclas (tales como INKEY y KEY DEF). 



Estado 


Funcion JOY 


Numeros de tecla 


Arriba 
Abajo 
Izquierda 
Derecha 
Disparo 2 
Disparo 1 


Bit que 
esta a 1 


Valor 
generado 


Primer 
joystick 


Segundo Tecla 
joystick equivalente 




1 
2 
3 
4 
5 


1 
2 
4 
8 

16 
32 


72 
73 
74 
75 
76 
77 


48 '6' 

49 '5' 

50 'R' 

51 "T 

52 'G' 

53 'F' 



Notese que cuando se generan los valores correspondientes al segundo joystick, el ordena- 
dor no puede saber si esos valores han sido generados por el joystick o por las teclas equiva- 
lentes (ultima columna de la tabla anterior). Esto representa que se puede utilizar el teclado 
como sustituto del segundo joystick. 
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Parte 13: Ampliaciones del sistema 
residentes (RSX) 



El repertorio de instrucciones de BASIC puede ser ampliado anadiendole 'ordenes exter- 
nas'. En ocasiones, estas ordenes estaran grabadas en ROMs externas (por ejemplo, en la 
ROM de la unidad de disco opcional DDI-1, en la ROM del interfaz serie RS232C, etc.). 
Pero tambien es posible incorporar nuevas ordenes externas (cuando BASIC ya esta activa- 
do) cargando instrucciones de codigo de maquina adecuadas en la RAM. Tales ordenes ex- 
ternas son las llamadas 'ampliaciones del sistema residentes' (RSX) y actiian exactamente 
igual que las basadas en ROM. Las RSX han de ser cargadas desde la cinta cada vez que 
se entra en BASIC (en frio o en caliente). 

Todas las ordenes externas se escriben precedidas del signo ! . 

Entre sus aplicaciones tipicas se encuentra el control de perifericos (unidad de disco, inter- 
faz serie, lapicero f otosensible, . . . ) y la ampliation de BASIC con nuevas funciones y ruti- 
nas (por ejemplo, para rellenar recintos, dibujar circunferencias, realizar volcados de pan- 
talla en la impresora, etc.). 

La information necesaria para disefiar y gestionar las RSX se puede encontrar en la 'Guia 
del firmware', SOFT 158. 
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Parte 14: Memoria 



El CPC464 dispone de 64K de RAM y 32K de ROM. Esta memoria es utilizable por BASIC 
segiin se indica en la figura siguiente. La RAM esta dividida en cuatro bloques de 16K cada 
uno, numerados del al 3. La pantalla utiliza el bloque 3; la zona superior del bloque 2 
esta dedicada a las variables del sistema, segiin se muestra en la figura. 

RAM 



Bloqus 2 



Bloque 1 



&FFFF 



Bloque 3 < 



PANTALLA 



&C000 
&???? 

HIMEM 

&8000 



ROM de BASIC 



ROM de disco 
(externa) 



CARACTERES DEFINIBLES 



&4000 



Bloque i 



&0000 



Area de datos del firmware 

Bloque de saltos 

Area de datos de BASIC 

Area de datos de ROMs externas 



Area para el programa de BASIC 



ROM del firmware 



Nota. &???? depende de las ROMs externas conectadas. 

Los caracteres definidos por el usuario estan inicialmente inmediatamente por encima de 
HIMEM. Este valor se puede modificar mediante una orden MEMORY; ademas se reduce 
en 4K automaticamente para crear un tampon cada vez que se abre un fichero. El numero 
de caracteres definibles por el usuario (controlado por la orden SYMBOL AFTER de BA- 
SIC) solo se puede modificar si HIMEM no ha variado desde la ultima vez que aquel fue 
establecido (o si en esa ocasion se establecio en cero, con SYMBOL AFTER 256). Cuando 
se entra en BASIC, el numero de caracteres definibles por el usuario se establece como si 
se hubiera ejecutado la orden SYMBOL AFTER 240. 

Por consiguiente, antes de cambiar permanentemente HIMEM, es prudente reducir a cero 
la zona de memoria dedicada a los caracteres definibles; despues se modifica HIMEM y fi- 
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nalmente se restablece la zona de caracteres definibles al tamano deseado. De esta menera 
los siguientes programas podran ejecutar nuevas ordenes SYMBOL AFTER sin problemas. 

El siguiente ejemplo ilustra este metodo, aplicado a la carga de una RSX: 

100 SYMBOL AFTER 256 ' anular memoria para caracteres definibles por 

el usuario 
110 direccionrxs = HIMEM longitudrsx 
120 MEMORY direccionrsx-1 
130 LOAD "codigrsx",direccionrsx 
140 CALL direccionrsx ' inicializar rsx 
150 SYMBOL AFTER 140 ' restablecer espacio para caracteres definibles 



RAM 



&FFFF 



&C000 

HIMEM 
&8000 



&4000 



&0000 



RUTINAS Y DATOS DE RSX 



CARACTERES DEFINIBLES 



Area de datos del firmware 

Bloque de saltos 

Area de datos de BASIC 

Area de datos de ROMs externas 



Area para e! programa de BASIC 



Mapa de RAM con las RSX cargadas en la posicion recomendada. 
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Otras entradas y salidas 



La mayor parte de las direcciones de puertas de entrada/salida (E/S) esta reservada por el 
ordenador. En particular, las direcciones inferiores a &7FFF no se deben utilizar nunca. 

Esta previsto que la parte de la direction representada por A0-A7 refleje el tipo de dispositi- 
vo externo de E/S, y que las lineas de direction A8 y A9 puedan ser decodificadas para se- 
leccionar registros dentro del dispositivo de E/S. De las restantes lineas, solo A10 puede 
ser decodificada (a nivel 'bajo'); las lineas All a A15 estan todas a nivel 'alto'. Asi, los 
registros de los dispositivos se pueden direccionar como &F8??, &F9??, &FA?? y &FB??, 
donde ?? puede estar entre DC y FF para los interfaces de comunicacion y entre EO y FE 
para otros perifericos. 

Notese que se deben utilizar instrucciones del Z80 que pongan el registro B en la mitad supe- 
rior del bus de direcciones (A15-A8). 



Memorias ROM adicionales 



El sistema operativo esta preparado para seleccionar ROMs adicionales en lugar de parte 
de la ROM interna. La logica de gestion de direcciones y de selection de bancos estara en 
un modulo conectado al bus de expansion, pero todas las senales necesarias estan en el co- 
rrector de expansion. 
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Capitulo 5 
Cuando usted guste 



En este capitulo vamos a dar un repaso a ciertas cuestiones bdsicas de 
informdtica en general y del CPC464 en particular. No es imprescindible 
leer este capitulo para trabajar con el ordenador, pero puede ayudarle 
a entender algo de lo que estd ocurriendo en su interior. 



Parte 1: En terminos generates . . . 
jFulmina el bicho! 

Aun cuando lo unico que le interese de su CPC464 sea disfrutar de los sofisticados juegos 
de ordenador que se venden en las tiendas, es posible que se pregunte que tiene la maquina 
dentro, es decir, que es eso del hardware. 

Hardware es lo que usted puede coger y llevarse bajo el brazo (es un decir): la caja gris don- 
de esta el teclado, el monitor, los cables, etc. Mas en general, todo lo que no sea especifica- 
mente software: programas, manuales e information grabada en cinta o en disco. 

Ciertos aspectos del funcionamiento del ordenador estan estrechamente ligados al hardwa- 
re; por ejemplo, la imagen de color que usted puede ver en la pantalla. En cambio, es res- 
ponsabilidad del software controlar el hardware para producir los caracteres y dibujos 
deseados. 

Es el hardware el que dirige el haz de electrones a la superficie electroluminiscente de que 
esta recubierto el interior del tubo del televisor; el software aporta la organization y la inte- 
ligencia para decir al hardware como y cuando debe hacerlo. Anade ademas el control de 
los tiempos y de las secuencias de acciones para que usted pueda ver la nave espacial despe- 
gando, o para algo tan mundano como que aparezca una letra en la pantalla cada vez que 
usted pulsa una tecla. 

^Por que es un ordenador mejor que otro? 

El hardware sin el software es completamente inutil, y viceversa. El ordenador empieza a 
servir para algo cuando hardware y software se ponen de acuerdo para llevar a cabo sus 
cometidos. Hay algunas consideraciones basicas que se pueden tener en cuenta para valorar 
la calidad tanto de uno como del otro. 
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Los puntos de referenda generalmente aceptados para los ordenadores personales son: 

1. Resolution de la pantalla: tamano del menor elemento discernible 

El concepto de resolucion es una mezcla de di versos factores: numero de colores disponibles 
para el programador, numero de areas discernibles en la pantalla (pixels) y numero de ca- 
racteres de texto que caben en ella. 

Usted puede comprobar que su CPC464 es superior a este respecto a los otros ordenadores 
de su nivel de precio. 



2. El interprete de BASIC 

Practicamente todos los ordenadores domesticos incluyen un interprete de BASIC que per- 
mite al usuario crear programas con los que controlar el hardware. El lenguaje de progra- 
macion que viene con la maquina, BASIC, no es mas que un programa, pero un programa 
extremadamente complejo que ha evolucionado a lo largo de los afios, desde que se 'inven- 
to' el BASIC en los Estados Unidos. El 'Beginners' All-purpose Symbolic Instruction 
Code' (codigo de instrucciones simbolicas de uso general para principiantes) es el lenguaje 
de ordenador mas ampliamente utilizado en el mundo entero; como todos los lenguajes, 
tiene sus dialectos locales. 

La version utilizada en el CPC464 es una de las de mayor compatibilidad; puede ejecutar 
programas escritos para funcionar bajo control del sistema operativo de disco CP/M. Es 
una version muy rapida de BASIC, lo que quiere decir que realiza los calculos muy deprisa. 
A usted quiza no le parezca demasiado impresionante que un ordenador tarde 0.05 segun- 
dos en multiplicar 3 por 5 y escribir la respuesta, mientras que otro ordenador tarda 0.075 
segundos en hacer lo mismo. Pero cuando se trata de dibujar graficos en la pantalla, tarea 
que puede requerir millares de calculos repetitivos, la diferencia entre 0.05 y 0.075 segundos 
es decisiva. 

Usted oira hablar frecuentemente de 'codigos de maquina'. El codigo de maquina es una 
forma de suministrar instrucciones directamente al microprocesador. La velocidad de eje- 
cucion es entre 5 y 15 veces mayor en codigo de maquina que en BASIC, pero el tiempo 
que se tarda en escribir un programa puede ser hasta 50 veces mayor en codigo de maquina 
que en BASIC. 

El BASIC de Amstrad es de los mas rapidos y completos que se pueden encontrar en orde- 
nadores personales, e incorpora muchos recursos que ayudan al programador experto a su- 
perar parte de la lentitud inherente a todos los lenguajes de alto nivel para producir efectos 
visuales y sonoros sorprendentemente dinamicos. 



3. Ampliabilidad 

Casi todos los ordenadores prestan atencion a la necesidad de conectar perifericos tales co- 
mo impresoras, joysticks y unidades de disco. Sin embargo, muchos de los mas populares 
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ordenadores domesticos necesitan interfaces externas para que se les pueda conectar una 
simple impresora o un joystick. 

El comprador no siempre preve las necesidades futuras, pero un ordenador que incorpore 
un interfaz para impresora o un conector para joystick puede ser mas barato a la larga que 
otro por el que tenga que pagar menos en el momento de la adquisicion. 

El CPC464 tiene incorporada una puerta de salida para impresora (tipo Centronics), un co- 
nector para dos joysticks, una salida de sonido estereofonico y una puerta de expansion a 
la que se puede conectar una unidad de disco (modelo DDI-1), un interfaz serie (modelo 
RS232C), un modem, un sintetizador de voz (modelo SSA2), un lapiz optico, etc. 

4. Sonidos 

Las caracteristicas sonoras de un ordenador determinan si 'suena a lata' o si puede producir 
una imitation aceptable de un instrumento musical electronico. 

El CPC464 esta dotado de un generador de sonido de 3 canales y 8 octavas, que puede dar 
una calidad musical muy aceptable y permite el control completo de las envolventes de tono 
y de volumen. Ademas, el sonido se puede obtener en una configuration estereofonica, con 
canal izquierdo, canal derecho y canal comiin. 

Esto permite programar el sonido para coordinarlo con el movimiento de objetos por la 
pantalla. 

En ultimo extremo, es usted quien tiene que decidir que caracteristicas le son mas necesa- 
rias. Esperamos que las pruebe todas, para asi aprovechar al maximo su ordenador. 



^Por que no puede? 



Sabiendo lo poderosa que es la tecnologia actual, los usuarios se preguntan frecuentemente 
por que una maquina tan avanzada como el CPC464 es incapaz de imitar las imagenes de 
un televisor de color. Por ejemplo, ipor que no puede un ordenador mostrar en la pantalla 
la imagen de una persona caminando con naturalidad? <,Es que los ordenadores no son ca- 
paces de dar movimiento mas que a unos burdos monigotes? 

La respuesta es facil, aunque compleja. No crea usted que la pantalla de su ordenador pue- 
de tener la misma riqueza de detalles que la de un televisor. Los televisores funcionan con 
una information 'analogica', que puede describir, con resolution casi ilimitada, todos los 
grados posibles de intensidad de todos los colores del espectro visible. En terminos informa- 
ticos, esto representa que la 'memoria' necesaria para almacenar una imagen de television 
es unas veinte veces mayor que la que se le dedica a un ordenador domestico. 

Pero esto es solo una parte del problema. Para dar movimiento a una imagen, hay que pro- 
cesar toda esa information a gran velocidad (del orden de 50 veces por segundo). No es im- 
posible, pero para ello se necesitan maquinas que cuestan unos cuantos miles de veces mas 
que un ordenador domestico, al menos en la actualidad. 
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Hasta que el precio de la memoria de alta capacidad baje drasticamente (lo que ocurrira 
algun di'a), los ordenadores pequenos tienen que arreglarselas con una memoria relativa- 
mente pequefla para controlar la pantalla, lo que representa menor resolution y movimien- 
tos mas espasticos. Optimizando el hardware y el softaware se puede paliar considerable- 
mente estas limitaciones, pero de momento tendremos que seguir conformandonos con 
imagenes torpes que ni siquiera llegan a parecerse a las de una pelicula de dibujos animados 
de regular calidad. 



Ese teclado me suena . . . 



<,Por que no puedo sentarme ante el ordenador y escribir una sencilla pagina de texto? 

No se deje engaflar por el hecho de que el ordenador se parece a una maquina de escribir 
electronica con pantalla. La pantalla no es una hoja de papel electronico: es una 'consola 
de ordenes', expresion tecnica que quiere decir que es una via de comunicacion entre el 
usuario y el lenguaje de programacion que esta en la memoria de la maquina. 

Mientras no se le mande otra cosa, el ordenador tratara de entender todo lo que se le comu- 
nique a traves del teclado, pues supone que son instrucciones. Cuando usted pulsa [Intr o], 
el ordenador examina lo tecleado; si no es inteligible para el BASIC residente, lo rechaza 
y emite el mensaje: 

Syntax error 

Ahora bien, puede ocurrir que el programa actualmente presente en la memoria sea un pro- 
cesador de textos; en tal caso usted podra escribir las palabras que desee, pulsar [i ntro ] y 
seguir escribiendo a sus anchas, exactamente igual que si el ordenador fuera una maquina 
de escribir que utilizara papel electronico. Pero, para que esto sea posible, antes se debe 
haber cargado en la memoria un programa de proceso de textos. 

El ordenador parece combinar aparatos que nos resultan familiares de tanto verlos en casa 
y en la oficina, como son la pantalla y el teclado. Pero recuerde que la similitud normal- 
mente es superficial y que el ordenador es una combination de elementos con personalidad 
propia. 



^Quien teme a la jerga? 



Como ocurre con todas las ramas especializadas de la industria, la informatica ha desarro- 
llado una jerga propia para facilitar la comunicacion de conceptos complejos que de otra 
forma requerirfan muchas palabras de lenguaje ordinario. Esto no ocurre solamente en el 
campo de la alta tecnologfa; todos hemos topado con barreras de este tipo levantadas por 
los profesionales de distintas areas. 
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En el caso de la informatica, la confusion se debe mas a la forma de utilizar las palabras 
que a las palabras en si. (Y en castellano, a la imposibilidad de traducir ciertas palabras 
inglesas o a que no nos tomamos la molestia de intentarlo.) Casi todos los que llegan a fami- 
liarizarse con la terminologia de la informatica se esfuerzan por utilizar las palabras de la 
forma mas directa posible, con objeto de minimizar la dificultad de la comunicacion. Pero 
no crea que el lenguaje informatico es lo mismo que el lenguaje literario; la informatica 
no es literatura, sino una ciencia precisa; aparte la sintaxis, la estructura de la comunicacion 
en informatica es directa y sencilla, y de ningun modo confusa o ambigua. Como no es lite- 
ratura, la informatica no ha necesitado desarrollar una asignatura de 'comentario de textos' 
para analizar el significado exacto del significado de los programas. 

Independientemente de si el significado de un programa es obvio o no lo es, hay muchos 
aspectos de la programacion que se pueden calificar de embarullados o de elegantes; ahora 
que se esta asentando el revuelo inicial causado por la aparicion de los microordenadores, 
se esta prestando mayor atencion a los aspectos formales de la construction de programas. 

La informatica esta penetrando en las mentes de muchos jovenes que valoran la precision 
y la sencillez de las ideas y de la forma de comunicarlas. No hay demasiados ninos que a 
los diez afios sean ya abogados, pero si muchos que a esa edad saben programar. 



Lo basico de BASIC 

Casi todos los ordenadores domesticos tienen incorporado el lenguaje BASIC, que hoy por 
hoy es lo mas proximo al lenguaje ordinario. El nombre del lenguaje no implica ninguna 
limitation en cuanto a sus posibilidades; de hecho, se ha escrito programas extremadamente 
complejos y potentes en BASIC. 

Sin embargo, es evidente que el nombre ha atraido a muchos pricipiantes, que esperaban 
encontrar en BASIC un buen punto de partida entre el laberinto de los lenguajes de progra- 
macion; y esto ha contribuido en gran medida a su universalidad. 

BASIC es un lenguaje informatico que interpreta un reducido numero de ordenes, como 
resultado de las cuales realiza operaciones con los datos segun se va ejecutando el progra- 
ma. A diferencia del vocabulario humano medio, que consta de entre 5000 y 8000 palabras 
(ademas de la conjugation de los verbos, plurales, diminutivos, etc.), BASIC tiene que arre- 
glarselas con solo un par de centenares. Los programas escritos en BASIC tienen que ajus- 
tarse a reglas muy estrictas en cuanto a la forma de utilizar esas palabras. La sintaxis es 
muy precisa; todo intento de comunicarse con el ordenador en lenguaje coloquial producira 
el frio mensaje: 

Syntax error 

Esto no representa una limitation seria, ya que BASIC esta disenado para trabajar con nu- 
meros. Las palabras son basicamente una generalization de las operaciones matematicas 
elementales (+, -, etc.). El concepto mas importante que tienen que asimilar los princi- 
piantes es que el ordenador solo puede manejar datos numericos. Es decir, la information 
que se envia a la CPU (unidad central de proceso) tiene que estar en forma numerica. 
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Numeros 



Si emplearamos un ordenador para almacenar las obras completas de Shakespeare, en todo 
el sistema no encontran'amos ni una sola letra o palabra. Todo elemento de informacion 
debe ser convertido a numero antes de que el ordenador pueda reconocerlo y manipularlo. 

BASIC interpreta las palabras como si fueran numeros; para procesarlas, el ordenador no 
dispone de mas medios que la suma, la resta y la logica de Boole, con la cual puede hacer 
comparaciones y seleccionar atributos; en otras palabras, averiguar si un numero es menor 
o igual que otro, o realizar determinada tarea si un numero cumple cierta condition. 

A traves del programa, el ordenador desmenuza todas las tareas en sus componentes mas 
elementales. 

Si todo esto le parece farragoso, esta en lo cierto. Ha descubierto la primera y mas impor- 
tante verdad de la informatica. Un ordenador es una herramienta que sirve para realizar 
tareas elementales y repetitivas a gran velocidad y con precision absoluta. Asi, BASIC inter- 
preta las instrucciones que se le dan por medio del programa y las traduce al lenguaje que 
la CPU (unidad central de proceso) puede entender. La logica del ordenador solo distingue 
dos estados: si y no; en notation binaria, 1 y 0; en notation de Boole, 'verdadero' y 'falso'. 
No hay estados intermedios del tipo 'quiza'. 

El proceso de conmutacion entre esos dos estados es la esencia del termino 'digital'. En la 
naturaleza casi todos los procesos evolucionan gradualmente de un estado 'estable' a otro. 
En cambio, en la situation digital ideal, la transition de un estado a otro es instantanea. 
Sin embargo, las leyes de la fi'sica de semiconductores imponen un pequeno retardo, el re- 
tardo de propagation, que es el causante del tiempo que tarda el ordenador en procesar la 
informacion antes de dar la respuesta. 




&&■ 
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En todo caso, el ordenador tiene que esperar hasta que concluya una tarea antes de poder 
abordar la siguiente, lo que representa que siempre se le impone un retardo artificial. El 
proceso digital es 'bianco' o 'negro', y las fases de transicion por los diversos grados de 
'gris' no tienen ninguna importancia. En cambio, los procesos analogicos se realizan preci- 
samente a traves de esas fases de 'gris'. 

Si la respuesta final solo puede ser o 1, no es posible que el resultado sea 'casi' correcto. 
El hecho de que los ordenadores cometan errores en ocasiones se debe a la limitation del 
tamano de los numeros que pueden procesar; los numeros con demasiados di'gitos tienen 
que ser 'comprimidos' para que encajen en el espacio disponible, lo que conduce a errores 
de redondeo. 

En un mundo en el que solo existen los digitos y 1, <,como se cuenta mas alia de 1? 



Bits y bytes 



Estamos habituados a entender los numeros solamente cuando estan expresados en el siste- 
ma decimal, en el que el punto de referenda es el mimero 10 y en el que se dispone de 10 
digitos (del al 9) para representar los numeros. El sistema binario es conceptualmente ana- 
logo al decimal, pero con solo dos digitos; las unidades con las que opera este sistema son 
los denominados bits (forma contraida de Binary digiT, digito binario). 

La relation entre bits y numeros decimales es sencilla y vamos a estudiarla. 

Es habitual declarar el maximo niimero de bits que vamos a usar para representar los nume- 
ros, y afladir ceros por la izquierda para completar la expresion. Por ejemplo, el niimero 
decimal 7 se convierte en el binario 

00111 

en notation de 5 bits. 

En el sistema binario, los digitos se pueden considerar como indicadores dispuestos en co- 
lumnas para especificar si una determinada potencia de 2 esta presente o no lo esta: 

2° = 1 

2 1 = 2=2= 2(2°) 

2 2 = 4 = 2x2 = 2(2 X ) 

2 3 = 8 = 2x2x2 = 2(2 2 ) 

2 4 = 16 = 2x2x2x2 = 2(2 3 ) 

de modo que las columnas tienen el siguiente aspecto: 

2 4 2 3 2 2 2 1 2° 

10 11 

(16 + + + 2 + 1) = 19 

Para abreviar la terminologia al hablar de information binaria se introduce el concepto de 
'byte', que es una sucesion de 8 bits. El mayor mimero que se puede representar con un 
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byte es 11111111 (binario) o 255 (decimal). Si contamos tambien el 00000000, resulta un 
total de 256 numeros distintos, que son datos perfectamente validos para el ordenador. 

Los ordenadores prefieren manejar los bits en grupos de 8. El numero 256 es demasiado 
pequeno, y por eso, para poder controlar la memoria, se utilizan dos bytes que se interpre- 
tan en forma matricial. Cada position de memoria tiene una direccion vertical y otra hori- 
zontal, y entre las dos caracterizan sin ambigiiedad la position. Por ejemplo, la siguiente 
matriz 
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puede caracterizar hasta 10x10 elementos de information utilizando numeros de direccion 
comprendidos entre y 9. El elemento almacenado en la position 3,5 es un '1', lo mismo 
que el que esta en la position 5,5. 

Analogamente, una matriz binaria de 256x256 puede caracterizar 65536 posiciones utili- 
zando direcciones de 8 bits para los ejes vertical y horizontal de la matriz. Nuestros elemen- 
tos iniciales, '0' y '1', han progresado hasta ser capaces de identificar 65536 elementos 
diferentes. 

El siguiente nivel de abreviatura en terminologia binaria es el K, que representa 1024 bytes. 
El numero 1024 es la potencia de 2 mas proxima a nuestro 'kilo' (1000), y explica por que 
se dice que un ordenador es de 64K cuando en realidad tiene una memoria de 65536 bytes 
(64x1024). 

Afortunadamente, el interprete de BASIC se encarga de todas estas conversiones. Es per- 
fectamente posible llegar a ser un programador aunque no se domine el sistema binario. 
No obstante, unos conocimientos del sistema binario pueden ayudar a desenmascarar la 
magia de ciertos numeros clave que inevitablemente nos encontramos en informatica. 
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Vale la pena dedicar algiin tiempo a entender el sistema binario y a comprender el por que 
de numeros tales como el 255 o el 1024, pues parece evidente que estos numeros seguiran 
siendo el fundamento de la informatica, al menos en el futuro previsible. La fiabilidad y 
sencillez que proporciona el sistema binario se seguira imponiendo a la complejidad que 
implicaria cualquier otro sistema de numeracion. 



Sin embargo . . . 



Por sencilla y elegante que sea, la notacion binaria induce a confusion a los humanos, por- 
que no somos capaces de leer de un golpe de vista los numeros binarios. Hay algunos otros 
sistemas de numeracion que los programadores utilizan con mayor facilidad. Un sistema 
muy utilizado en microordenadores es el hexadecimal (HEX). Su base es el numero 16. La 
correspondencia entre digitos decimales y hexadecimales es la siguiente: 



Decimal 

12 3 4 5 6 7 



9 10 11 12 13 14 15 



Hexadecimal 

0123456789A 



B C D E 



El sistema hexadecimal puede dividir los 8 bits de un byte en dos bloques de 4 bits, ya que 
15 es un numero de 4 bits: 1 1 1 1 en binario. El primer bloque indica el numero de unidades 
completas de '15'; el segundo bloque indica el 'resto'. Y aqui es donde empieza a aparecer 
la elegancia de los sistemas binario y hexadecimal. A continuation damos una tabla de con- 
version entre los tres sistemas para los primeros numeros: 



Decimal 


Binario 


Hexadecimal 











1 


1 


1 


2 


10 


2 


3 


11 


3 


4 


100 


4 


5 


101 


5 


6 


110 


6 


7 


111 


7 


8 


1000 


8 


9 


1001 


9 


10 


1010 


A 


11 


1011 


B 


12 


1100 


C 


13 


1101 


D 


14 


1110 


E 


15 


un 


F 


16 


10000 


10 
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Un niimero de 8 bits tal como el 11010110 (&D6 hex) puede ser subdividido en dos de 4 
bits. A lo largo de todo este manual indicamos los niimeros hexadecimales precediendo los 
del signo &. El sistema hexadecimal es el mas utilizado por los programadores que trabajan 
en ensamblador. El lenguaje ensamblador es la etapa mas cercana a codigo de maquina a 
la que llegan normalmente los programadores; permite expresar las instrucciones en 'codi- 
gos nemotecnicos', que son algo mas inteligibles que los codigos de maquina. 

Para convertir un niimero hexadecimal en binario, lo primero que hay que hacer es obsevar 
el primer di'gito, para ver cuantos grupos de '16' hay en el niimero, multiplicar por 16 y 
luego sumar al resultado el valor del segundo digito. Asi pues, no se deje llevar por la tenta- 
cion de pensar que &D6 es 13 + 6, ni 136, porque en realidad es (13 x 16)+(6) = 214. 

El proceso es el mismo que seguimos cuando leemos un niimero decimal: 89 = (8xl0)+9. 
Lo que ocurre es que nos resulta mucho mas facil multiplicar por 10 que por 16; es una 
cuestion de practica. 

Si usted ha conseguido llegar hasta aqui sin estar demasiado confuso, puede decir que esta 
en el buen camino para llegar a entender los principios basicos del ordenador. Quiza se pre- 
gunte para que nos metemos en todas estas complicaciones, y tiene razon. Un ordenador 
es un aparato que maneja ideas y conceptos muy sencillos; lo que tiene de especial es que 
realiza esas operaciones a una velocidad muy grande (millones de veces por segundo) y que 
tiene una enorme capacidad para recordar los datos, tanto los que se le han suministrado 
como los resultados intermedios de los muchos miles de sumas que realiza antes de poder 
dar la respuesta final. 

Si desea seguir estudiando la teoria de los ordenadores, sepa que hay miles de libros dedica- 
dos a estos temas. Algunos no le aclararan en absoluto las ideas, sino todo lo contrario, 
pero otros en cambio le guiaran en el descubrimiento de la sencillez y las relaciones funda- 
mentales que existen entre los sistemas de numeration y le ayudaran a comprender la forma 
en que el ordenador los maneja. 
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Parte 2: Mas en concreto sobre el CPC464 

En esta section vamos a tratar algunas cuestiones especificas del 
CPC464. La information basica sobre estos temas se puede encontrar en 
el 'Curso de introduction' y en el capitulo titulado 'Lista completa de 
las palabras clave del BASIC de Amstrad'. 

Temas tratados en esta section: 

* Juegos de caracteres 

* ASCII 

* Variables 

* Logica 

* Caracteres definidos por el usuario 

* Formatos de escritura 

* Ventanas 

* Interrupciones 

* Datos 

* Sonido 



Caracteres 



Cuando se ponga al teclado de su CPC464, no de por supuesto que en la pantalla vayan 
a aparecer letras y numeros reconocibles. Ya hemos explicado que el ordenador no es una 
maquina de escribir. Lo que usted hace es pulsar una serie de conmutadores electricos; las 
senales electricas asi producidas son traducidas por los circuitos internos para enviar a la 
pantalla grupos de puntos. Segun sea la colocacion de esos puntos, podremos reconocer le- 
tras, numeros u otros caracteres del 'juego de caracteres' del CPC464. 

Algunos de estos caracteres no son accesibles directamente a traves del teclado, sino me- 
diante la instruction PRINT CHR$(<numero>). Esto es asf porque la information se alma- 
cena en el ordenador en unidades de 1 byte y, como vimos en la parte 1 de este capitulo, 
1 byte puede tener 256 formas posibles. Dado que el ordenador tiene que dedicar al menos 
un byte a cada caracter almacenado, mas vale que aprovechemos las 256 combinaciones po- 
sibles en lugar de conformarnos con los 96 'caracteres estandar' de las maquinas de escribir 
y desperdiciar los 160 restantes. 

Los caracteres estandar son un subconjunto del juego total de caracteres. Su nombre en in- 
formatica es 'caracteres ASCII', termino derivado de 'American Standard Code for Infor- 



Cuando usted guste . . . 5/1 1 



mation Interchange' (codigo estandar norteamericano para el intercambio de la informa- 
tion). Se trata de un sistema disefiado para asegurar la compatibilidad de los datos transmi- 
tidos de un ordenador a otro. En el capitulo 7 hemos dado la lista de todos los caracteres 
ASCII, asf como de los demas caracteres disponibles en el CPC464, junto a sus numeros 
de codigo. 



Vamos a verlos 

Seguramente ya no encierra ningiin secreto para usted un programa tan sencillo como este: 

10 FOR n = 32 TO 255 
20 PRINT CHR$(n); 
30 NEXT 

con el que hacemos que el ordenador muestre en la pantalla el juego completo de caracteres. 
Pero estudiemos un poco la esencia de este programa. 

Lo primero que debemos obsevar es que al ordenador no le hemos dicho PRINT 
"abcdefghijklmn . . . ", sino PRINT CHR$(n). En vez de mencionar exph'citamente los ca- 
racteres hemos puesto en su lugar una 'variable'. Una variable es un elemento de informa- 
tion que varia segiin impongan las instrucciones del programa. (El nombre que hemos dado 
a la variable en este caso, n, es arbitrario; podriamos haber puesto cualquier letra o combi- 
nation de letras, cualquier cosa que no fuera una palabra reservada de BASIC.) 

^Como sabemos que es una variable? 

Un mimero tal como el 5 es fijo, esta entre el 4 y el 6 y no tiene nada de variable. El caracter 
n tambien es fijo: es una letra concreta del alfabeto. 

Entonces, i,como distingue el ordenador las variables de las constantes? Si hubieramos que- 
rido decide que considerara la n como letra del alfabeto, la habriamos escrito entre comi- 
llas: "n". El ordenador habria respondido con el mensaje Syntax error, porque no enten- 
deria la linea FOR "n"=32 TO 255. 

Al escribir la n sin comillas le hemos dicho al ordenador que n es una variable. La instruc- 
tion FOR de BASIC tiene que ir seguida del nombre de una variable, y el ordenador da 
por supuesto que lo que pongamos despues de FOR es una variable. 

Tambien le hemos dicho al ordenador n = 32 TO 255, con lo que hemos especificado el mar- 
gen de variation de la variable: una sucesion que empieza en 32 y termina en 255. 

Una vez declarada la variable, debemos decirle al ordenador que tiene que hacer con ella; 
eso es lo que hace la linea 20: 

20 PRINT CHR$(n); 
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Esta instruction hace que el ordenador, cualquiera que sea el valor de n, busque en su me- 
moria el caracter que corresponde a ese valor y lo escriba en la pantalla. 

El punto y coma impide que el ordenador realice un retorno de carro y avance de linea des- 
pues de escribir cada caracter. (De no ser asf, los caracteres aparecerian uno debajo de otro 
en la primera columna de cada linea.) 

La linea 30 le dice al ordenador que cuando haya concluido la tarea con el primer valor 
de n (que es el 32) debe retornar a la linea en la que esta FOR y volver a hacer lo mismo 
con el siguiente (NEXT) valor de la variable n. Este mecanismo, denominado 'bucle', es 
fundamental para la programacion. Gracias a el nos ahorramos el tener que escribir largas 
series de instrucciones similar es. Usted aprendera enseguida a incluirlo en sus programas. 

Cuando el bucle FOR . . . NEXT alcanza el limite superior del margen declarado (255), el 
bucle termina y el ordenador vuelve al modo directo y muestra el mensaje Ready. Este 
mensaje indica que el ordenador esta preparado para recibir mas instrucciones, una de las 
cuales podria ser RUN, para ejecutar otra vez el programa. El programa esta almacenado 
en la memoria y lo seguira estando hasta que le digamos al ordenador que lo borre o apa- 
guemos la maquina. 

Este programa ilustra un hecho esencial de la informatica: todo lo que el ordenador hace 
esta relacionado con numeros. El ordenador ha escrito el alfabeto y todos los demas carac- 
teres usando como referenda para acceder a ellos un numero. Cuando usted pulsa la tecla 
A, no le esta pidiendo al ordenador que escriba esa letra, sino que busque en su memoria 
la information numerica que necesita para exhibir el caracter en la pantalla. La localization 
de esa information es funcion del codigo numerico que se activa al pulsar la tecla. (Cada 
caracter tiene un codigo asociado; la relation completa se da en el capitulo titulado 'Para 
su referencia . . .'.) 

Pero tampoco el hecho de visualizar el caracter tiene nada que ver con 'escribir', sino que 
es un proceso numerico. 

Por ejemplo, el codigo ASCII de la letra A es el 65. El ordenador tampoco entiende el nu- 
mero 65, por lo que tiene que traducirlo de decimal a una forma que le resulte mas familiar: 
el codigo de maquina. Ya hemos estudiado los principios de esta conversion en la primera 
parte de este capitulo. 

Al principio, la conversion de la notation decimal, a la que estamos tan acostumbrados, 
a notation hexadecimal nos parece muy dificil. Pensar en numeros decimales nos parece 
tan natural que cambiar de sistema de numeration es como cambiar de mano el tenedor 
y el cuchillo. 

Para manejar la notation hexadecimal es necesario adquirir cierto grado de destreza men- 
tal. Una vez adquirida, se empieza a entender el por que de muchos hechos informaticos 
y se hace patente la elegancia de la estructura de este sistema de numeration. 

Si no conoce los sistemas binario y hexadecimal, le sugerimos que lea detenidamente la pri- 
mera parte de este capitulo. 

Cuando el ordenador ha convertido la pulsation de la tecla A en un numero comprensible 
para el, busca en una zona de la memoria especificada por ese numero, y en ella encuentra 
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otra serie de niimeros que describen la forma de la letra. El caracter que usted puede ver 
en la pantalla esta formado por un bloque de datos, almacenado en la memoria en forma 
de 'matriz' numerica: 






i rm m i 



sSrfb: 



MATRIZ EN BLANCO 
(RETICULA) 



a MINUSCULA 



A MAYUSCULA 



Los elementos de la matriz son puntos dispuestos en filas columnas. El caracter se 'escribe' 
encendiendo y apagando correctamente los puntos. En el CPC464 cada matriz tiene 8 fi- 
las y 8 columnas. Si entre los 255 caracteres no encuentra el que necesita, usted mismo pue- 
de definirlo a su gusto con la instruction SYMBOL que describiremos mas adelante. 

Los caracteres 'definidos por el usuario' se construyen especificando cada uno de los 64 
puntos de la matriz. Las combinaciones posibles con 1.84467E+19, es decir, aproximada- 
mente un 2 seguido de 19 ceros. Si a esto anadimos la posibilidad de agrupar caracteres para 
formar bloques mas grandes, vemos que las posibilidades de generar graficos solo estan li- 
mitadas por la imagination del usuario. 



Logica 



Una diferencia fundamental entre una calculadora y un ordenador radica en la capacidad 
de este para manejar operaciones logicas y tomar decisiones en instrucciones del tipo 
IF . . . THEN . . . (si . . . entonces . . .). Para ello, los operadores logicos tratan los valores 
a los que son aplicados como grupos de bits y examinan y modifican los bits uno a uno. 
No es facil describir las operaciones logicas sin antes dar unas definiciones concisas. 

Las dos mitades de una expresion logica son los 'argumentos'. Una expresion logica tiene 
la siguiente forma: 

<argumento> [<operador 16gico> <argumento>] 

donde <argumento> puede ser: 

NOT <argumento> 
< expresion numerica) 
< expresion de relation) 
(< expresion logica)) 



5/14 



Cuando usted guste 



Los dos argumentos de un operador logico tienen que ser enteros; de lo contrario se produ- 
ce el error niimero 6. 

Los operadores logicos (en orden de prioridad) y su efecto sobre los bits son los siguientes: 

AND El resultado es a menos que los bits de los dos argumentos sean 1. 
OR El resultado es 1 a menos que los bits de los dos argumentos sean 0. 
XOR El resultado es 1 a menos que los bits de los dos argumentos sean iguales. 

AND es el operador logico mas utilizado. 

PRINT 10 AND 10 
da como resultado 10. 

PRINT 10 AND 12 
da como resultado 8. 

PRINT 10 AND 1000 

tambien da como resultado 8. 

Esto se debe a que los numeros 10 y 1000 han sido convertidos a su forma binaria: 

1010 
1111101000 

La operation AND comprueba los bits dos a dos. Si los dos bits de las dos filas son 1, el 
resultado es 1: 

0000001000 

y este numero binario es el 8 decimal. El operador logico AND se utiliza para detectar cuan- 
do se cumplen simultaneamente dos condiciones. He aqui un ejemplo que explica como: 

10 INPUT "Dia del mes: ",dia 

20 INPUT "Mes numero: ",mes 

30 IF dia=25 AND mes=12 THEN 50 

40 CLS:GOTO 10 

50 PRINT "Feliz Navidad!" 

OR funciona de forma analoga, pero da como resultado 1 a no ser que los bits de los dos 
operandos sean 0, en cuyo caso el resultado es 0. Aplicado a los mismos numeros que en 
el ejemplo de AND, 

PRINT 1000 OR 10 
1002 
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Bit a bit: 

1010 
1111101000 

cuyo resultado es 

1111101010 

Un programa ejemplo: 

10 CLS 

20 INPUT "Mes numero: ",mes 

30 IF mes = 12 OR mes = 1 OR mes=2 THEN 50 

40 GOTO 10 

50 PRINT "Estamos en invierno!" 

El operador NOT invierte todos los bits del argumento (convierte el en 1, y viceversa): 

10 CLS 

20 INPUT "Mes numero: ",mes 

30 IF NOT(mes=6 OR mes = 7 OR mes = 8) THEN 50 

40 GOTO 10 

50 PRINT "No estamos en verano!" 

Observe que se pueden combinar los operadores logicos, sin mas limitation que la longitud 
de la linea: 

10 INPUT "Dia del mes: ",dia 

20 INPUT "Mes numero: ",mes 

30 IF NOT(mes = 12 OR mes = 1) AND dia=29 THEN 50 

40 CLS:GOTO 10 

50 PRINT "No es ni diciembre ni enero, pero puede ser un ano bisiesto" 

El resultado de una expresion de relation es -1 o 0. La representation binaria del numero 
-1 es una sucesion de bits iguales a 1; para el 0, todos los bits son 0. El resultado de una 
operation logica entre argumentos de este tipo da -1 (verdadero) o (falso). 

Afiada las siguientes lineas al programa anterior: 

60 PRINT NOT(mes=12 OR mes = 1) 
70 PRINT (mes = 12 OR mes = 1) 

Si al ejecutar el programa introduce 29 para el dia y 2 para el mes, obtendra el mensaje 
de la linea 50, y las lineas 60 y 70 escribiran los resultados de las operaciones. 

Finalmente, XOR (OR eXclusivo) produce como resultado 'verdadero' siempre que los ar- 
gumentos sean diferentes. 
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A continuation resumimos todo lo dicho en una tabla, denominada tabla de verdad. Es una 
forma muy clara de ilustrar que sucede en una operation logica bit a bit. 



Argumento A 


1010 


Argumento B 


0110 


Resultado de AND 


0010 


Resultado de OR 


1110 


Resultado de XOR 


1100 





8 




= 


8 


32+16+8+4 




= 


60 




+ 2 


= 


66 




+4 


+ 1 


= 


165 






+ 1 


= 


129 


32+16 


+4 


+ 1 


= 


181 


32+16 




+ 1 


= 


177 



Caracteres definidos por el usuario 

Una de las primeras aplicaciones que el lector encontrara para los numeros binarios es el 
diseno de caracteres con la instruction SYMBOL. Como sabemos, el caracter se disena en 
una reticula de 8 por 8; cada una de las 8 filas se convierte en un numero binario poniendo 
un 1 en lugar del pixel que debe ser iluminado, y un cero en lugar del pixel que debe quedar 
del color del papel. Los 8 numeros asi obtenidos seran los parametros de SYMBOL. Por 
ejemplo, para definir un caracter que representa una casa: 

* = 00001000 = &08 = 

**** = 00111100 = &3C = 

* * = 01000010 = &42 = +64 

* * * * = 10100101 = &A5 = 128 

* * = 10000001 = &81 = 128 
*****= 10110101 = &B5 = 128 

* ** * = 10110001 = &B1 = 128 
******** = 11111111 = &FF = 128 + 64+32+16+8+4+2+1 = 255 

la orden es 

SYMBOL 240,8,60,66,165,129,181,177,255 
o bien 

SYMBOL 240,&08,&3C,&42,&A5,&81,&B5,&B1,&FF 

o bien 

SYMBOL 240,&X00001000,&X001 1 1 100,&X01000010,&X10100101 ,&X10000001 , 
&X10110101,&X10110001,&X11111111 

Para escribir el caracter asi definido: 

PRINT CHR$(240) 
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Finalmente, para agrupar caracteres se puede hacer 

adosado$ = CHR${240)+CHR${240) 
PRINT adosado$ 

o bien 

urbanizacion$ = STRING${15,240) 
PRINT urbanizacion$ 



La imprenta . . . 

PRINT es la primera instruction que se usa cuando se empieza a programar. En principio 
es muy sencilla, pero podemos complicarla considerablemente. En efecto, no basta con pe- 
dirle al ordenador que escriba, sino que tambien debemos decirle donde y como. 



Formato de escritura 

La instruction PRINT se puede utilizar de diversas formas. La mas sencilla es poner a su 
derecha el elemento que se desea escribir, que puede ser un numero, una cadena literal o 
el nombre de una variable: 

PRINT 3 
3 

PRINT "hola" 
hola 

a=5 

PRINT a 
5 

a$ = "prueba" 
PRINT a$ 
prueba 

En una instruction PRINT se pueden poner varios elementos, intercalando entre ellos un 
separador, o bien TAB o SPC. Los separadores pueden ser la coma o el punto y coma. 
El punto y coma hace que el siguiente elemento se escriba inmediatamente a continuation 
del que se acaba de escribir; la coma provoca el salto a la siguiente zona de escritura. La 
anchura implicita de la zona de escritura es 13, pero se la puede modificar con la orden 
ZONE: 
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PRINT 3;-4;5 
3-4 5 

PRINT "buenos'V'dias" 
buenos dias 

PRINT 3,-4,5 
3-4 5 

ZONE 4 
PRINT 3,-4,5 
3-4 5 

Observe que los numeros positivos llevan un espacio a la izquierda, mientras que en los ne- 
gatives ese espacio esta ocupado por el signo - . Todos los numeros llevan un espacio en 
bianco a la derecha. Las cadenas se escriben literalmente tal como estan entre las comillas. 

La funcion SPC lleva como parametro una funcion numerica; 'escribe' tantos espacios co- 
mo indique el valor de la expresion. Si el valor es negativo, se toma el 0; si es mayor que 
la anchura de la ventana actual se toma esa anchura: 

PRINT SPC(5)"hola" 
hola 

x=3 

PRINT SPC(x*3)"hola" 
hola 

TAB es similar, pero el niimero de espacios que escribe es el necesario para que el siguiente 
elemento se empiece a escribir en la columna especificada. 

La ventana en la que se escribe es la niimero 0, a no ser que se especifique otro niimero 
de canal (#) antes de la lista de elementos. Se pueden especificar otros canales para enviar 
la salida a otras ventanas. Los canales 8 y 9 estan reservados para la impresora y la cinta, 
respectivamente. (Observese que para 'escribir' en el canal #9 se debe utilizar WRITE en 
lugar de PRINT.) 

PRINT "hola" 

hola - ventana 

PRINT #0,"hola" 

hola - tambien ventana 

PRINT #4,"hola" 

hola - ventana 4 (primera linea de la pantalla) 

PRINT #8,"hola" 

hola - en la impresora (si esta conectada) 
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Con TAB y SPC se pueden controlar los formatos mas sencillos, pero en cuanto el formato 
deseado sea un poco mas complejo habra que utilizar PRINT USING y una 'plantilla' ade- 
cuada. Una plantilla de formato es una expresion literal que contiene caracteres especiales, 
cada uno de los cuales especifica un formato determinado. Estos caracteres, denominados 
'especificadores de formato', estan explicados en detalle en la description de PRINT 
USING (capftulo 3). Aqui vamos a dar algunos ejemplos. 

En primer lugar, he aqui los formatos disponibles para escribir cadenas literales: 

" escribe tantos caracteres como espacios haya en la plantilla, mas dos: 

PRINT USING " ";"cadena de prueba" 

cadena d 

"\" escribe solamente el primer caracter de la cadena: 

PRINT USING"!";"cadena de prueba" 
c 

Pero el formato literal mas litil es seguramente "&". Con el se anula una funcion de BASIC 
por la cual, si una cadena es demasiado larga como para caber en la linea actual, el ordena- 
dor la escribe al principio de la linea siguiente. PRINT USING "&"; desactiva esa funcion. 
(En el siguiente ejemplo ponga BORDER para hacer visibles los bordes del papel.) 

MODE 1:LOCATE 39,1:PRINT "demasiado" 

- linea 1 
demasiado 

- linea 2 
MODE 1:LOCATE 39,1:PRINT USING "&";"demasiado" 

de - linea 1 

masiado - linea 2 

Para los numeros se dispone de gran variedad de plantillas. La mas sencilla es PRINT 
USING "#####", en la que cada # reserva espacio para un digito: 

PRINT USING "######";123 
123 

La position del punto decimal se puede especificar incluyendo un punto en la plantilla: 

PRINT USING "####. #####";12.45 
12.45000 

Los digitos que quedan a la izquierda del punto decimal se pueden agrupar de tres en tres, 
separados por comas, si se pone una coma a la izquierda del punto en la plantilla: 

PRINT USING "########, .####";123456.78 
123,456.7800 
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En el formato se pueden incluir los signos de dolar y de libra esterlina, para que aparezca 
siempre el signo monetario antes del primer digito, aunque el numero no llene el formato. 
Esto se consigue poniendo $$ en la plantilla: 

PRINT USING "$$## ";7 
$7 

PRINT USING "$$##";351 
$351 

PRINT USING "$$####,. ##";1234.567 
$1,234.57 

Observe como se ha redondeado este ultimo numero. 

Se puede rellenar el espacio sobrante por la izquierda con asteriscos poniendo * * en la 
plantilla: 

PRINT USING "**####. #";12.22 
*** *12.2 

Esto ultimo se puede combinar con los signos monetarios poniendo * *$ en la plantilla. 

Un signo + al principio de la plantilla especifica que siempre se debe escribir el signo del 
numero a su izquierda. Si el + esta al final de la plantilla, el signo se describe a la derecha 
del numero. 

El signo - solo se puede poner al final de la plantilla; especifica que se debe poner el signo 
- a la derecha del numero si este es negativo. 

PRINT USING "+##";12 
+ 12 

PRINT USING "+## ";-12 
-12 

PRINT USING "## + ";12 
12 + 

PRINT USING "##-";-12 
12- 

PRINT USING "##-";12 
12 
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La inclusion de "TTTT" en la plantilla hace que el niimero se escriba en forma exponencial: 

PRINT USING "###.##TTTT";123.45 
12.35E+01 

En cualquier caso, si el niimero es demasiado grande como para caber en el formato especi- 
ficado, el niimero no se trunca, sino que se lo escribe entero, precedido de un signo % para 
indicar lo que ha ocurrido: 

PRINT USING "####";123456 
%123456 



Ventanas 



El BASIC del CPC464 permite la definicion y el control de hasta ocho ventanas de texto. 
Todas las acciones de control de textos se pueden referir a cualquiera de estas ventanas. 

Las ventanas se definen con la orden WINDOW, que va seguida de 5 parametros. El prime- 
ro es opcional y especifica el niimero de la ventana que se va a definir; si se lo omite, el 
ordenador supone el 0, que es el canal por el que el BASIC emite sus mensajes normales 
(Ready, errores, etc.). Antes del niimero se pone el signo # para indicar que se esta dando 
un niimero de canal. Los otros cuatro parametros especifican los extremos izquierdo, dere- 
cho, superior e inferior de la ventana. Como son mimeros de fila y de columna, pueden 
estar comprendidos entre 1 y 80 los dos primeros, y entre 1 y 25 los dos liltimos. 

El siguiente ejemplo define la ventana (canal) niimero 4, la cual se extiende desde la colum- 
na 7 hasta la 31, y desde la fila 6 hasta la 18. Reinicialice la maquina y luego escriba: 

WINDOW #4,7,31,6,18 

No parece que haya ocurrido nada, asi que escriba lo siguiente: 

INK 3,9 
PAPER #4,3 
CLS #4 

En la pantalla ha aparecido un gran rectangulo verde, que es la ventana niimero 4. Este 
ultimo ejemplo demuestra que las instrucciones PAPER y CLS se pueden referir a cualquie- 
ra de las ocho ventanas especificando el niimero de canal; su omision hace que la orden 
actiie sobre la ventana niimero 0. 

Las ordenes para las que se puede especificar niimero de ventana son las siguientes: 

CLS, INPUT, LINE INPUT, LIST, LOCATE, PAPER, PEN, POS, PRINT, TAG, 
TAGOFF, VPOS, WINDOW, WRITE. 
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La ventana verde que hemos creado habra borrado parte del texto que terriamos en la pan- 
talla, que habi'a sido enviado a la ventana numero 0. 

El texto se puede escribir en cualquier ventana especificando el numero de canal en la ins- 
truction PRINT: 

PRINT #4,"estoy en la ventana 4" 

Estas palabras han aparecido en el extremo superior de la ventana verde, no en la linea si- 
guiente de la pantalla, que es lo que habria ocurrido con: 

PRINT "estoy en la ventana 0" 

Observe que al escribir esta ultima orden el texto ha invadido parte de la ventana verde. 

Si usted desea confinar todos los mensajes de BASIC a la ventana numero 4, intercambiela 
con la implicita (la numero 0) mediante la orden: 

WINDOW SWAP 0,4 

El mensaje Ready ha aparecido ahora en la ventana verde y el cursor esta debajo de el. 
Escriba lo siguiente: 

PRINT #4, "estoy en la ventana 4" 

El texto ha aparecido debajo de la orden WINDOW SWAP, en lo que antes era la ventana 
y ahora es la 4. Estos ejemplos demuestran que el ordenador recuerda la position de escri- 
tura de cada ventana incluso despues de un intercambio. Escriba lo siguiente: 

LOCATE #4,20,1 

PRINT "estoy en la ventana 0" 

PRINT #4, "estoy en la ventana 4" 

Mientras no se ejecuta una orden WINDOW, todas las ocho ventanas coinciden con la pan- 
talla entera. Lo mismo ocurre despues de una orden MODE. Asi pues, si despues de jugar 
con las ventanas se encuentra con que el cursor esta en una muy pequena, puede salir del 
lio escribiendo MODE 1: 

MODE 1 

WINDOW 20,21,7,18 

MO 

DE 

1 

El ordenador se ha visto obligado a partir la palabra MODE, pero la instruction funciona 
igual. (No olvide dejar un espacio entre la E y el 1.) 
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Ahora que ya tiene una idea de como funcionan las ventanas, escriba y pruebe el siguiente 
programa: 

10 MODE 

20 FOR n = 0TO 7 

30 WINDOW #n,n + 1,n+6,n + 1,n+6 

40 PAPER #n,n+4 

50 CLS #n 

60 FOR c = 1 TO 200:NEXT c 

70 NEXT n 

Este programa crea 8 ventanas que se solapan y las borra con un color de papel diferente 
para cada una. 

Cuando termine el programa y haya aparecido Ready, pulse [Intr o] varias veces para ob- 
servar como afecta el desplazamiento de la ventana a los bloques de colores. Sin embargo, 
aunque el contenido de las ventanas se desplace, las ventanas en si siguen estando en el mis- 
mo sitio. Compruebelo escribiendo: 

CLS #4 

Fijese tambien en los diferentes efectos de las siguienes ordenes: 

LIST 
LIST #4 
LIST #3 

Otra caracteristica interesante de la orden WINDOW es que tambien admite los numeros 
que especifican los bordes izquierdo y derecho en orden inverso; es decir, aunque el primer 
parametro sea mayor que el segundo, BASIC los interpreta en el orden correcto. Analoga- 
mente ocurre con los bordes inferior y superior. 

10 MODE 

20 a = 1 + RND*19:b = 1 + RND*19 

30 c = 1 + RND*24:d = 1 + RND*24 

40 e = RND*15 

50 WINDOW a,b,c,d 

60 PAPER e:CLS 

70 GOTO 20 



Interrupciones 



Por si todavia no lo ha leido en otro lugar de este manual, le diremos que una de las princi- 
pales innovaciones del software de los ordenadores Amstrad es su capacidad de gestion de 
las interrupciones desde BASIC; esto hace que el BASIC de Amstrad sea capaz de realizar 
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acciones simultaneas controladas por programa. Esto es lo que se suele denominar 'multita- 

rea', y se programa con las instrucciones AFTER y EVERY. 

Esta misma habilidad queda demostrada por la forma en que se controla el sonido a traves 

de recursos tales como las colas de sonido y la sincronizacion de canales. 

De todo lo que tenga que ver con la medida del tiempo se encarga el cronometro patron 

del sistema, que es un circuito controlado por un cristal de cuarzo. Este reloj se encarga 

de cronometrar y de sincronizar los procesos que tienen lugar dentro del ordenador: desde 

el barrido de la pantalla hasta el envio de impulsos al microprocesador. Toda funcion del 

hardware que tenga que ver con el tiempo depende del reloj patron. 

Las instrucciones AFTER (despues de) y EVERY (cada) hacen precisamente lo que su nom- 
bre sugiere. Asi, AFTER invoca una determinada subrutina cuando ha transcurrido el tiem- 
po especificado. 

El CPC464 mantiene un reloj de tiempo real. La orden AFTER permite que un programa 
de BASIC realice una tarea en un instante futuro especificado. Existen cuatro temporizado- 
res de retardo, cada uno de los cuales puede tener una subrutina asociada. 
Cuando el tiempo especificado ha transcurrido, la rutina se ejecuta automaticamente, exac- 
tamente igual que si el ordenador hubiera encontrado un GOSUB en la linea actual del pro- 
grama. Cuando la rutina se acaba, con el RETURN habitual, el programa continiia a partir 
del punto en que fue interrumpido. 

La orden EVERY permite que el programa de BASIC ejecute subrutinas a intervalos de 
tiempo regulares. Tambien en este caso se dispone de cuatro temporizadores, a cada uno 
de los cuales se puede asignar una subrutina distinta. 

Los temporizadores tienen prioridades de interruption diferentes, lo que tiene importancia 
cuando varios de ellos compiten por interrumpir el programa en un momento dado. El tem- 
porizador 3 tiene la maxima prioridad, y el la minima (vease el capitulo 'Para su referen- 
da .. . ')■ 

10 MODE 1:n = 14:x=RND*400 

20 AFTER x,3 GOSUB 90 

30 EVERY 25,2 GOSUB 150 

40 EVERY 10,1 GOSUB 160 

50 PRINT'Pruebe sus reflejos:" 

60 PRINT'pulse la barra espaciadora" 

70 PRINT'cuando yo le diga." 

80 IF ind = 1 THEN END ELSE 80 

90 x=REMAIN(2) 

100 SOUND 129,20:PRINT "AHORA ":t=TIME 

110 IF INKEY(47)=-1 THEN 110 

120 PRINT'Ha tardado"; 

130 PRINT(TIME-t)/300;"segundos" 

140 ind = 1:RETURN 

150 SOUND 1,0,50:PRINT".";:RETURN 

160 n = n + 1:IF n>26 THEN n = 14 

170 INK 1,n:RETURN 



Cuando usted guste . . . 5/25 



Las ordenes AFTER y EVERY se pueden ejecutar en cualquier lugar del programa. Su efec- 
to es reelegir la rutina asociada y poner a cero el temporizador correspondiente. Los tempo- 
rizadores estan compartidos por AFTER y EVERY, de modo que una orden AFTER cancela 
la anterior EVERY referida al mismo temporizador, y viceversa. 

Las ordenes Dl y El inhiben y habilitan, respectivamente, las interrupciones. Esto sirve para 
permitir que cierta interruption se procese sin ser interrumpida por otra mas prioritaria. 
La orden REMAIN da el tiempo que queda en un temporizador y lo desactiva. 



Listas de datos 

Si un programa necesita que se le suministre siempre la misma information cada vez que 
se lo ejecuta, es preferible hacer que esa information este contenida en el propio programa 
para no tener que teclearla con cada ejecucion. Esto es posible gracias al par de instruccio- 
nes READ/DATA. La orden READ es similar a INPUT en el sentido de que asigna valores 
a variables, pero en lugar de captar los valores por el teclado los lee en listas encabezadas 
por la palabra DATA. Los dos ejemplos siguientes ilustran la diferencia: 

10 INPUT "escriba 3 numeros separados por comas: "a,b,c 

20 PRINT"los numeros son";a;"y";b;"y";c 

run 

10 READ a,b,c 

20 PRINT'los numeros son";a;"y";b;"y";c 

30 DATA 12,14,21 



Los datos contenidos en las listas DATA van separados por comas, lo mismo que los que 
se teclean en respuesta a una instruction INPUT. 

Las listas DATA pueden contener, no solo numeros, sino tambien cadenas literales 
constantes: 

10 DIM a$(11) 

20 FOR i=0TO 11 

30 READ a$(i) 

40 NEXT 

50 FOR i = 0TO 11 

60 PRINT a$(i);" "; 

70 NEXT 

80 DATA Cuentan,de,un,sabio,que,un,dia,tan,pobre,y,misero,estaba 

run 
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Observe que no es necesario encerrar entre comillas las cadenas que se ponen en las listas 
DATA. Las comillas en este caso son opcionales (tambien lo son en INPUT). El linico caso 
en que son necesarias es cuando una cadena contiene una coma; si no se la pusiera entre 
comillas, la instruction READ se detendria en la coma y no leeria el resto de la cadena. 

10 READ a$ 

20 WHILE a$<>"*" 

30 PRINT a$ 

40 READ a$ 

50 WEND 

60 DATA los dias de la semana son lunes, martes, miercoles, jueves, 

viernes y sabado 
70 DATA "los dias de la semana son lunes, martes, miercoles, jueves 

viernes y sabado" 
80 DATA * 
run 

La cadena de la li'nea 60 contiene comas, y por lo tanto cada tramo sera leido por READ 
y escrito por separado. En cambio, la de la linea 70 ha sido delimitada por comillas y READ 
la lee de una sola vez. 

El ejemplo anterior demuestra que los datos pueden estar distribuidos en varias lfneas (60, 
70, 80, . . .). Otro detalle no tan evidente es que las lfneas DATA pueden estar en cualquier 
lugar del programa, antes o despues de las instrucciones READ que leen la information. 

Si un programa contiene varias instrucciones READ, cada una continiia leyendo donde ter- 
mino la anterior: 

10 DATA 123,456,789,321,654,2343 

20 FOR i = 1 TO 5 

30 READ num 

40 total = total + num 

50 NEXT 

60 READ total2 

70 IF total = total2 THEN PRINT "los datos son correctos" ELSE PRINT 

"hay un error en los datos" 
run 

Modifique uno de los primeros cinco numeros de la lista de la linea 10 y ejecute otra vez 
el programa. Esta tecnica de poner al final de la lista un dato adicional que sea la suma 
de los anteriores constituye un buen metodo de detection de errores en los datos, especial- 
mente si los datos son muchos. Se le llama 'suma de verification' (checksum). 

Si un programa requiere datos mixtos (cadenas y numeros), se los puede combinar en una 
misma lista DATA, a condition de que READ los lea en el orden correcto. Por ejemplo, 
si una lista DATA contiene dos numeros seguidos de una cadena, la instruccion READ ten- 
dra que leer primero dos variables numericas y luego una literal: 
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10 DIM a(5),b(5),s$(5) 

20 FOR i = 1 TO 5 

30 READ a(i),b(i),s$(i) 

40 NEXT 

50 DATA 1,7,Alfredo,3,9,Juan,2,2,Enrique,4,6,Pedro,9,1, Manuel 

60 FOR i = 1 TO 5 

70 PRINT s$(i),":";a(i)*b(i) 

80 NEXT 

Tambien se puede separar los datos en dos listas distintas: 

10 DIM a(5),b(5),s$(5) 

20 FOR i = 1 TO 5 

30 READ a(i),b(i) 

40 NEXT 

50 FOR i = 1 TO 5 

60 READ s$(i) 

70 NEXT 

80 DATA 1,7,3,9,2,2,4,6,9,1 

90 DATA Alfredo, Juan, Enrique, Pedro, Manuel 

100 FOR i = 1 TO 5 

110 PRINT s$(i),":";a(i)*b(i) 

120 NEXT 

Si ahora cambiamos el h'mite superior de la linea 20: 

20 FOR i = 1 TO 4 

los dos primeros intentos de leer cadenas daran '9' y '1'. Estos valores son cadenas validas, 
pero el programa no funciona como esperabamos. Una forma de asegurar que el programa 
funcione correctamente consiste en incluir las lineas: 

15 RESTORE 80 
45 RESTORE 90 

La orden RESTORE hace que el puntero de datos 'apunte' hacia el principio de la linea 
especificada; por lo tanto se la puede incluir en una instruction condicional para que el blo- 
que de datos leidos dependa del resultado de alguna comprobacion. Por ejemplo, en un jue- 
go que este previsto para varios niveles de destreza, los datos de cada nivel pueden ser selec- 
cionados mediante una variable adecuada. Veamos un ejemplo: 

1000 REM seccion para dibujar la pantalla 
1010 IF nivel = 1 THEN RESTORE 2010 
1020 IF nivel = 2 THEN RESTORE 2510 
1030 IF nivel = 3 THEN RESTORE 3010 
1040 FOR y=1 TO 25 
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1050 FOR x=1 TO 40 

1060 READ car 

1070 LOCATE x,y:PRINT CHR$(car); 

1080 NEXT x,y 

2000 REM DATA para pantalla 1 

2010 DATA 200,190,244,244,210, . . . etc. 

2500 REM DATA para pantalla 2 

2510 DATA 100,103,245,243,251, . . . etc. 

3000 REM DATA para pantalla 3 

3010 DATA 190,191,192,193,194, . . . etc. 

Otra aplicacion tipica de las instrucciones DATA/READ/RESTORE es un programa que 
interprete una melodfa. Los periodos de tono se pueden poner en listas data; RESTORE 
puede hacer que se repita una section moviendo el puntero de datos hacia atras: 

10 FOR i = 1 TO 3 

20 RESTORE 100 

30 READ nota 

40 WHILE nota <>-1 

50 SOUND 1,nota,35 

60 READ nota 

70 WEND 

80 NEXT 

90 SOUND 1,142,100 

100 DATA 95,95,142,127,119,106 

110 DATA 95,95,119,95,95,119,95 

120 DATA 95,142,119,142,179,119 

130 DATA 142,142,106,119,127,-1 

run 



£1 sonido de la miisica 



De todas las instrucciones del CPC464, es posible que las de sonido y envolventes le parez- 
can las mas imponentes a primera vista. Y sin embargo, con un poco de practica, muy pron- 
to podra programar ruidos de diversos tipos e incluso melodias con armonia. 

Empecemos por analizar las cuatro primeras partes de la instruction SOUND, que son las 
siguientes: situation de canales, periodo de tono, duration de la nota y volumen. Lo prime- 
ro que hay que saber es en que margen de valores puede estar cada uno de estos parametros. 
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Aplazaremos el primero de momento porque es el mas complicado. El segundo, periodo 
de tono, puede tener cualquier valor entero comprendido entre y 4095. Sin embargo solo 
algunos de estos valores producen notas reconocibles: son los que estan relacionados en la 
parte 5 del capitulo 'Para su referenda . . . '. Por ejemplo, el numero 478 produce la nota 
DO media; el 506 produce la nota SI inmediatamente anterior; los valores 479 a 505 produ- 
cen cada uno un tono diferente, pero ninguno de ellos corresponde a la escala del piano. 
Si el parametro es 0, no se produce ningun tono; esto es util cuando se esta generando ruido. 

El tercer parametro de la orden SOUND especifica la duration de la nota en unidades de 
centesimas de segundo. Su valor puede estar normalmente entre 1 y 32767. Si es 0, la dura- 
cion queda controlada por la 'envolvente' (de la que hablaremos mas adelante). Si el para- 
metro es negativo, su valor obsoluto indica cuantas veces se va a repetir la envolvente; por 
ejemplo, -3 significa 'repetir la envolvente tres veces'. 

El cuarto parametro especifica el volumen. Puede valer entre y 15; el valor implicito es 
12, que es el que el ordenador supone si no se especifica otra cosa. En los sonidos sencillos 
que hemos conocido hasta ahora, el volumen ha permanecido constante durante el tiempo 
en que ha sonado cada nota. Sin embargo, cuando se utiliza una 'envolvente de volumen' 
para hacer que este deje de ser constante, el parametro 'volumen' de SOUND se considera 
como volumen inicial de la nota. 

Bueno, vamos con el parametro de situation de canales. Quiza sepa ya el lector que el signi- 
ficado de este parametro depende del valor de sus bits; para entenderlo necesitara saber al- 
go acerca de los niimeros binarios (parte 1 de este capitulo). 

El sonido se puede generar en tres canales distintos. Si el ordenador esta conectado a un 
amplificador estereofonico, un canal sera el derecho, otro el izquierdo y otro comiin a am- 
bos o central. Para especificar en que canal o canales debe sonar una nota se utilizan los 
siguientes niimeros: 

1 canal A 

2 canal B 
4 canal C 

Para enviar el sonido a varios canales, se suman los niimeros correspondientes. Por ejem- 
plo, para que la nota suene en los canales A y C, el parametro debe ser 1+4 = 5. 

SOUND 5,284 

Se preguntara el lector por que el numero del canal C es 4, y no 3. Observe que estos tres 
niimeros son potencias de 2(1 =2T0, 2=2T1, 4 = 2T2) y se combinan para dar un niimero bi- 
nario. Si imaginamos un numero binario de tres digitos, cada uno de ellos se puede utilizar 
para indicar si el canal correspondiente debe estar conectado o desconectado. En el ejemplo 
anterior, 5 en decimal es equivalente a 1*4+0*2+1*1, es decir, 101 en binario. Si a los 
digitos de este niimero binario les ponemos las etiquetas C, B y A, tenemos 

C B A 

1 1 
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de forma que C y A estan conectados, mientras que B esta desconectado. Si quisieramos 
que la nota sonase en los canales A y B, el numero tendn'a que ser 

C B A 

1 1 

En decimal: 0*4+1*2+1*1=3. La orden SOUND seria 
SOUND 3,284 

Naturalmente, este numero tiene que coincidir con el que se obtendria sumando los valores 
correspondientes a los dos canales: 1+2=3 (recuerde que A=l, B = 2, C=4). 

Si despues de todo no ha entendido como funciona esto en binario, no se preocupe. Le bas- 
ta con saber que las combinaciones de canales se programan sumando los numeros de selec- 
tion de los canales deseados. 

Lamentablemente (o afortunadamente, segun como se mire), todavia podemos sumar otros 
numeros a este parametro. Asi, los numeros 8, 16 y 32 especifican que el sonido debe sin- 
cronizarse con otro canal (A, B o C, respectivamente). Ahora hace falta saber que es eso 
de 'sincronizar con un canal'. Pues bien, los sonidos que hemos generado hasta ahora han 
ido directamente al canal especificado. Escriba lo siguiente: 

SOUND 1,284.2000 
SOUND 1,90,200 

A menos que sea usted un mecanografo muy lento, habra tenido tiempo de escribir la se- 
gunda orden antes de que se extinguiera el primer sonido. Esto ocurre porque el sistema 
de sonido puede guardar hasta cinco ordenes en cada una de las colas de los tres canales. 
Si queremos que suene una nota por el canal A y luego dos notas simultaneamente en los 
canales A y B, necesitamos un forma de indicar al ordenador que no debe ejecutar la nota 
del canal B mientras no haya terminado la primera del A. En esto consiste la sincronizacion 
de canales. Hay dos formas de conseguirla: 

SOUND 1,200,1000 
SOUND 3,90,200 

En este ejemplo hemos dirigido la segunda nota a A y B, y por lo tanto no puede sonar 
mientras no haya concluido la primera. La limitation de este metodo es que el sonido que 
se envia a varios canales tiene que ser igual en todos ellos (en este caso, ,90,200 era igual 
para el A que para el B). El otro metodo es el siguiente: 

SOUND 1,200,2000 
SOUND 1+16,90,200 
SOUND 2+8,140,400 

Aqui hemos hecho que la segunda nota de A se sincronice con el sonido de B (y que este 
se sincronice con el canal A). La ventaja de este metodo es evidente: las notas sincronizadas 
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pueden ser (y en este caso son) diferentes. Estos numeros de sicronizacion tambien son in- 
terpretables bit a bit: 

8 = 2T3, 16=2T4, 32 = 2T5 

Asi, el numero de situacion de canales se puede considerar como numero binario cuyos digi- 
tos tienen el siguiente significado: 



Sincr. con 


Sincr. con 


Sincr. con 


Sonar en 


Sonar en 


Sonar en 


C 


B 


A 


C 


B 


A 


Sumar 32 


Sumar 16 


Sumar 8 


Sumar 4 


Sumar 2 


Sumar 1 



Por ejemplo, para hacer sonar una nota en el canal C sincronizado con el A: 

1 10 

Este es el numero binario 1100, equivalente a 8 + 4 en decimal. 

Asi pues, el numero de situacion de canales 12 ordena a la maquina que haga sonar una 
nota en el canal C y que espere por una nota que debe sonar en el canal A y que ha sido 
marcada para sincronizarla con el C. 

Si ahora sumamos 64 (=2T6) al parametro, estamos indicando que la nota debe ser reteni- 
da. Esto significa que no va a sonar mientras no la liberemos con la orden RELEASE. 

Finalmente, si sumamos 128 (=2T7), borramos la cola de sonido del canal especificado. 

Por ejemplo, si hemos ordenado un sonido que va a durar un buen rato, podemos anularlo 
borrando la cola del canal correspondiente: 

SOUND 1,248,30000 (esta nota dura 5 minutos) 

SOUND 1+128,0 (pero esta la detiene) 

Cuando se este en modo directo, la forma mas rapida de interrumpir un sonido es pulsar 
Eborr] al principio de la linea; el pitido que asi se produce borra todas las colas de 
sonido. 

Ahora que ya sabemos enviar sonido a cualquier combination de canales (con sincroniza- 
cion, si es necesario), vamos a intentar producir algo mas agradable que los molestos piti- 
dos que produce una orden SOUND en esta forma sencilla. Lo haremos dotando al sonido 
de una envolvente: una grafica que define como evoluciona la intensidad del sonido a lo 
largo del tiempo. Las notas producidas por los instrumentos musicales tienen una fase ini- 
tial de ataque en la que el volumen sube muy deprisa; despues se mantiene a un nivel algo 
inferior hasta que finalmente decae gradualmente a cero. En el ordenador se puede dar una 
envolvente de este tipo a las notas producidas por la orden SOUND. La instruction con 
la que se programa la envolvente es ENV. Veamos un ejemplo sencillo: 

ENV 1,5,3,4,5,-3,8 
SOUND 1,284,0,0,1 

La instruction ENV se debe ejecutar antes que la SOUND que la utiliza. Para invocar una 
envolvente en una instruction SOUND se pone como quinto parametro de este el numero 
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de referenda de la envolvente, en este caso el 1, que es el numero con que se la creo en la 
instruction ENV. Los parametros de ENV describen tanto la duration como el volumen de 
la nota, de modo que en SOUND podemos poner en lugar de los datos de duration y 
volumen. La envolvente del ejemplo anterior hace que la nota crezca en 5 etapas, en cada 
una de las cuales el volumen aumenta en 3 unidades y cuya duration es de 4 centesimas de 
segundo. Despues se especifica que el volumen debe decaer en 5 etapas, -3 unidades en 
cada una, siendo la duration de cada etapa 8 centesimas de segundo. Es decir, el primer 
parametro de ENV es el numero de referenda de la envolvente y va seguido por grupos de 
tres mimeros. Dentro de cada grupo, el primer parametro es el numero de escalones de va- 
riation del volumen; el segundo, la amplitud de esos escalones; y el tercero, su duration. 
La duration total de cada section sera igual al producto del primer parametro (numero de 
escalones) por el tercero (duration de cada escalon). El aumento o disminucion total del 
volumen es igual al producto del primer parametro por el segundo (variation del volumen 
por escalon). La duration total de una envolvente es la suma de las correspondientes a las 
secciones que la integran. 
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En el ejemplo anterior, SOUND fijaba en el volumen inicial de la nota. Pero esto no tiene 
que ser necesariamente asi. En el siguiente ejemplo el volumen decrece desde el valor inicial 
15 y luego vuelve a subir: 

ENV 2,5,-2,1,20,0,1,10,1,1 
SOUND 1,284,0,15,2 

El numero de esta envolvente es el 2. Consta de tres secciones. En la primera el volumen 
se reduce en 5 escalones de —2; es decir, varia a traves de 5 etapas y en cada una se reduce 
en 2 unidades. La duracion de cada etapa es de 1 centesima de segundo. La segunda seccion 
tiene 20 etapas en las que no varia el volumen (0) y cada una de las cuales dura 1 centesima 
de segundo. Finalmente, la tercera seccion consta de 10 etapas, con un incremento de volu- 
men de 1 unidad y duracion de 1 centesima de segundo cada una. 

La instruction SOUND especifica un volumen inicial de 15; al final de la primera seccion 
ha decrecido hasta 5; se mantiene a ese nivel durante 20 centesimas de segundo y luego vuel- 
ve a crecer hasta alcanzar el nivel 15. 

Para mejor visualizar y disenar la forma de las envolventes conviene dibujarlas en un papel 
milimetrado y leer en el los valores de los parametros requeridos. En las dos figuras de la 
pagina anterior mostramos las dos envolventes definidas hasta ahora. 

El maximo numero de secciones que se puede incluir en una envolvente es 5; como cada 
seccion requiere 3 parametros, la instruction ENV puede llegar a tener 16 parametros en 
total, contando el primero, que indica cual de las 15 envolventes posibles se esta definiendo. 
Podemos imaginar los numeros de volumen como dispuestos en circulo; si vamos subiendo 
de nivel y sobrepasamos el 15, volvemos al 0; analogamente, si intentamos descender por 
debajo del 0, volvemos al 15. Por ejemplo, en 

ENV 3,9,5,20 
SOUND 1,284,0,0,3 

la envolvente consta de una sola seccion de 9 etapas, cada una de las cuales incrementa el 
volumen en 5 unidades y dura 20 centesimas de segundo. Al terminar la tercera etapa, el 
volumen ha subido de a 15; en la cuarta etapa volvera a 4; en la quinta a 9, etc. El proceso 
esta ilustrado en la figura de la pagina siguiente. 

El margen de valores para el numero de escalones es de a 127. En cada uno el valor puede 
variar entre —128 y +127 (los valores negativos representan disminucion). La duracion de 
cada escalon puede ser de entre y 255 (centesimas de segundo). 

Ya sabemos como variar el volumen de una nota. Ahora podemos estudiar como se define 
la variation de su tono con el tiempo para producir efectos tales como el 'vibrato'. 

El metodo es muy parecido al de las envolventes de volumen. Las envolventes de tono se 
definen con la instruction ENT. Por ejemplo: 

ENT 1,5,1,1,5,-1,1 
SOUND 1,284,10,15,,! 
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15- 
14- 
13- 



10- 
9- 



NUMERO DE ESCALONES: 9 
ALTURA DE ESCALON: 5 
DURACION DE ESCALON: 20 



Las envolventes de tono se invocan con la instruction SOUND poniendo en esta como sexto 
parametro el numero de referenda de la envolvente. La instruction ENT tiene que ser ejecu- 
tada antes que la SOUND que la utiliza. 

Este primer ejemplo de ENT define la envolvente de tono numero 1. La primera section 
consta de 5 etapas; en cada una el periodo de tono crece en 1 unidad; cada una dura 1 cente- 
sima de segundo. La segunda section consta de 5 etapas; la variation del periodo de tono 
en cada una de ellas es -1 (descenso); la duration de cada etapa es de 1 centesima de segun- 
do. La duration total es, pues, 5 + 5=10 centesimas de segundo. Observese que esta dura- 
tion ha sido especificada en SOUND, ya que la duration de la envolvente de tono no deter - 
mina la duration de la nota (mientras que si lo hace la envolvente de volumen). Si la dura- 
tion especificada en SOUND es menor que la de la envolvente, el final de esta se perdera. 
Si es mayor, el final de la nota se ejecutara a tono constante. Esto ultimo es tambien aplica- 
ble a las envolventes de volumen. 

(Notese la ausencia del numero de envolvente de volumen en la ultima instruction SOUND, 
debida a que aiin no hemos definido una envolvente de volumen para este sonido.) 

Las envolventes de tono normalmente duran menos que la nota. Se puede hacer que la en- 
volvente se repita mientras la nota esta sonando. Para ello se especifica un numero de en- 
volvente negativo, cuyo valor absoluto se cita en la instruction SOUND: 

ENT -5,4,1,1.4,-1,1 
SOUND 1,284,100,12„5 

Esta repetition de la envolvente produce el efecto 'vibrato'. Cuando se disenan envolventes 
de tono, es conveniente que el tono varie simetricamente con respecto al valor initial, de 
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forma que al repetir la envolvente el tono no se desvie demasiado con respecto al valor cen- 
tral. Pruebe el siguiente sonido: 

ENT -6,3,1,1 
SOUND 1,284,90,12„6 

Habra observado que la frecuencia ha disminuido drasticamente. Esto ha ocurrido porque 
la envolvente impone un aumento del periodo de tono de 3 unidades y se repite 30 veces 
(90/3). No obstante, ese efecto se puede aprovechar para imitar trinos y slrenas: 

ENT -7,20,1,1,20-1,1 
SOUND 1,100,400,12„7 

ENT -8,60,-1,1,60,1,1 
SOUND 1,100,480,12„8 

Se pueden definir hasta 15 envolventes de tono, con numeros de referenda del 1 
al 15; los numeros negativos indican que la envolvente se repite. Para cada section, el nu- 
mero de escalones puede estar entre y 239. La variation del periodo de tono en cada esca- 
lon puede ser de entre -128 y +127. La duration de cada escalon puede ser de entre y 
255 (centesimas de segundo). Cada envolvente puede tener hasta 5 secciones. 

El ultimo parametro que se puede incluir en la instruction SOUND, el septimo, caracteriza 
el nivel de ruido que se afiade al sonido. Observese que solo hay un canal de ruido y que, 
por consiguiente, cada vez que se especifica un nivel de ruido se anula la anterior 
especificacion. 

El ruido se puede mezclar con un tono, pero tambien se lo puede programar por separado, 
para lo cual se debe poner un como periodo de tono en SOUND. Esto es litil para imitar 
ruidos de percusion: 

ENT -3,2,1,1,2,-1,1 
ENV 9,15,1,1,15,-1,1 
FOR a = 1 TO 10:SOUND 1,4000,0,0,9,3,15: NEXT 

Un ruido como este puede servir de base para imitar el de una locomotora. Observese que 
hemos combinado los dos tipos de envolvente y el ruido. En SOUND hemos puesto para 
los parametros de duration y de volumen, por lo que estas caracteristicas quedan controla- 
das por las envolventes de volumen. 

Como ya estamos en condiciones de utilizar SOUND, ENV y ENT a plena potencia, vamos 
a estudiar algunas otras ordenes y funciones. 

Como el lector recordara, al describir el primer parametro de SOUND dijimos que si le su- 
mabamos el numero 64 el sonido quedaba 'retenido' en la cola, y que no sonaria mientras 
no lo liberasemos. La forma de liberarlo es ejecutar la orden RELEASE. Esta palabra va 
seguida de un numero cuyos bits determinan a que canales afecta la orden: 

4 significa canal C 
2 significa canal B 
1 significa canal A 
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Los canales se combinan sumando los numeros correspondientes. Asi, para liberar el soni- 
do de los tres canales la orden que se requiere es: 

RELEASE 7 

donde 7=1+2+4. Si no hay sonido retenido en ningun canal, la orden no tiene efecto. 
Pruebe lo siguiente: 

SOUND 1+64,90 

SOUND 2+64,140 

SOUND 4 + 64,215 

RELEASE 3:FOR t = 1 TO 1000:NEXT:RELEASE 4 

No se produce ningun sonido mientras no se ejecuta la primera orden RELEASE, la cual 
libera los sonidos de los canales A y B. Despues de una pausa, la segunda orden RELEASE 
libera el canal C. 

Hay otro metodo para sincronizar sonidos. Cuando se retiene un sonido sumando 64 a su 
numero de situation de canal, no solo queda el retenido, sino todos los que se envien a con- 
tinuation a ese mismo canal. Si se envian mas de cuatro sonidos a una cola que esta reteni- 
da, la maquina queda bloqueada hasta que se libere la cola (posiblemente al ejecutarse una 
subrutina invocada por AFTER o EVERY). Esta no es una buena forma de gestionar los 
sonidos, ya que la maquina se detendra cada vez que se llene una cola. Lo mismo ocurre 
si se ejecutan varias ordenes SOUND seguidas. Pruebe este programa: 

10 FOR a = 1 TO 8 

20 SOUND 1,100*a,200 

30 NEXT 

40 PRINT "hola" 

run 

El texto no aparece en la pantalla inmediatamente, sino al cabo de tres segundos. Esto ocu- 
rre porque el programa no puede llegar a la linea 40 mientras no haya espacio libre en la 
cola para almacenar todos los sonidos. 

BASIC dispone de un mecanismo de interruption, similar al que se utiliza en AFTER, 
EVERY y ON BREAK GOSUB, mediante el cual se puede hacer que se ejecute una subruti- 
na cada vez que queda espacio libre en una cola especificada: 

10 a=0 

20 ON SQ(1) GOSUB 1000 

30 PRINT a; 

40 GOTO 30 

1000 a = a + 10 

1010 SOUND 1,a,200 

1020 IF a<200 THEN ON SQ(1) GOSUB 1000 

1030 RETURN 
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Observe que el programa no se detiene. La instruction SOUND no se ejecuta mientras no 
hay espacio libre en la cola del canal A (1), hecho que detecta la orden ON SQ(1) GOSUB 
de la linea 20. Esta orden inicializa un mecanismo de interruption que ejecuta la subrutina 
cada vez que queda un hueco libre en la cola especificada. El mecanismo tiene que ser reini- 
cializado cada vez que se ejecuta la subrutina (linea 1020). En este ejemplo, la reinitializa- 
tion solo se produce si a es menor que 200. 

En un programa que lleve a cabo acciones relativamente lentas (por ejemplo, mover objetos 
por la pantalla), se puede poner miisica de fondo programando una subrutina que ejecute 
una nota cada vez que quede un hueco libre en la cola. De esta forma se asegura que el 
programa no se va a detener en espera de que quede espacio en la cola. Si los valores de 
las notas estan contenidos en listas DATA, se puede hacer que la subrutina de sonido deje 
de reinicializarse cuando los datos esten a punto de agotarse. 

El parametro que va entre parentesis en la instruction ON SQ( ) GOSUB puede ser 1, 2 
o 4, dependiendo del canal cuya cola se desee examinar. 

Hay una funcion, SQ( ), que se puede utilizar para determinar el estado de los canales de 
sonido. Su parametro puede ser 1, 2 o 4. El valor generado por la funcion se interpreta bit 
a bit segiin la siguiente tabla: 



Bit Decimal Significado 



0, 1, 2 


1 a 4 


3 


8 


4 


16 


5 


32 


6 


64 


7 


128 



Numero de huecos libres en la cola 

La primera nota de la cola esta marcada para sincronizar con el canal A 
La primera nota de la cola esta marcada para sincronizar con el canal B 
La primera nota de la cola esta marcada para sincronizar con el canal C 
La primera nota de la cola esta retenida (esta a 1 el bit de retention) 
En este momento esta sonando una nota 



Pruebe el siguiente ejemplo: 

10 SOUND 2,200 

20 x=SQ(2) 

30 PRINT BIN$(x) 

run 

La linea 30 escribe el numero binario 10000100. El bit 7 esta a 1, lo que indica que en el 
canal habia una nota sonando cuando se ejecuto la linea 20. Los tres digitos menos signifi- 
cativos son 100; equivalen al numero decimal 4, y esto quiere decir que habia cuatro espa- 
cios libres en la cola. Esta funcion examina la situation del canal en un punto especifico 
del programa; en cambio, ON SQ( ) GOSUB examina la cola, y reacciona en consecuencia, 
en un punto indeterminado. 

Hasta ahora todos los ejemplos han consistido en hacer sonar una o dos notas. Si se va a 
ejecutar un grupo de notas independientes, por ejemplo las de una melodia, sus caracteristi- 
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cas se pueden guardar en h'neas DATA, para luego leerlas con READ e introducirlas en 
SOUND: 

10 FOR octava=-1 TO 2 

20 FOR x=1 TO 7:REM notas por octava 

30 READ nota 

40 SOUND 1,nota/2Toctava 

50 NEXT 

60 RESTORE 

70 NEXT 

80 DATA 426,379,358,319,284,253,239 

run 

El ejemplo final de esta section se basa en este concepto. En los canales A y B se hace sonar 
una melodia con ritmo, utilizando la sincronizacion. Este ejemplo muestra como utilizar 
las listas DATA para incluir information sobre nota, octava, duration y sincronizacion: 

10 REM la linea 190 da la melodia en clave de agudos 

20 REM la linea 200 da la melodia en clave de graves 

30 DIM escala%(12):FOR x% = 1 TO 12:READ escala%(x%):NEXT 

40 canal1% = 1:READ canal1$:canal2% = 2:READ canal2$ 

50 CLS 

60 velocidad% = 12 

70 escala$=" a-b b c+c d-e e f+f g + g" 

80 ENV 1,2,5,2,8,-1,10,10,0,15 

90 ENV 2,2,7,2,12,-1,10,10,0,15 

100 ENT -1,1,1,1,2,-1,1,1,1,1 

110 DEF FNm$(s$,s) = MID$(s$,s,1) 

120 canal1% = 1:GOSUB 200 

130 canal2% = 1:GOSUB 380 

140 IF canal1% + canal2%>0 THEN 140 

150 END 

160 DATA &777,&70c,&6a7,&647,&5ed,&598 

170 DATA &547,&4fc,&4b4,&470,&431,&3f4 

180 DATA 4cr4f4f1f1g1A1-B2C2f4g2g1A1-B6A2Cr1f1g1f1g1a1-b1A1-b2 

C2g2A2g2f1g1a2g2f6e2c2e2c2g2e2c1 - B1A2g2f4e4d8c4f3f1c2d4- b2f r2 

-B2A2g2f6e2gr4C4-B1a1f1-b1g2c2-b4a4g4fr6A2A2-B4-B2Ar2-B2 

A2g2f6e2g4C4- B1 A1f 1 - B1g2C2- B4A4g8f . 
190 DATA r4f4f8f4e4c4fr8f4e2f2e4d2e2d8c8c6e2f4g4g8e4f3f1c4dr8g4cr4e4c6 

f2d4c4c8fr8-e4dr8g8c4e4c6f2d4c4c8f. 
200 REM enviar sonido al canal A 
210 p1$ = FNm$(canal1$,canal1%) 
220 IF p1$<> "r" THEN r1%=0:GOTO 240 

230 r1% = 16:canal1%=canal1% + 1:p1$ = FNm$(canal1$,canal1%) 
240 IF p1$="." THEN canal1%=0:RETURN ELSE !1% = VAL(p1$) 
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250 canal1% = canal1% + 1 

260 n1$=FNm$(canal1$,canal1%) 

270 canal1%=canal1%+1 

280 IF n1$=" + " OR n1$="-" THEN 350 

290 n1$=" "+n1$ 

300 nd1% = (1 + INSTR(escala$,LOWER$(n1$)))/2 

310 IF ASC(RIGHT$(n1$,1))>96 THEN o1%=8 ELSE o1% = 16 

320 SOUND 1+r1%,escala%(nd1%)/o1%,velocidad%*l1%,0,1,1 

330 ON SQ(1) GOSUB 200 

340 RETURN 

350 n1$=n1$ + FNm$(canal1$,canal1%) 

360 canal1% = canal1% + 1 

370 GOTO 300 

380 REM enviar sonido al canal B 

390 p2$=FNm$(canal2$,canal2%) 

400 IF p2$<>"r" THEN r2%=0:GOTO 420 

410 r2%=8:canal2% = canal2% + 1:p2$ = FNm$(canal2$,canal2%) 

420 IF p2$="." THEN canal2%=0:RETURN ELSE l2%=VAL(p2$) 

430 canal2% = canal2% + 1 

440 n2$ = FNm$(canal2$,canal2%) 

450 canal2% = canal2% + 1 

460 IF n2$ = " + " OR n2$="-" THEN 530 

470 n2$=" " + n2$ 

480 nd2% = (1 + INSTR(escala$,LOWER$(n2$)))/2 

490 IF ASC(RIGHT$(n2$,1))>96 THEN o2%=4 ELSE o2%=8 

500 SOUND 2+r2%,escala%(nd2%)/o2%,velocidad%*l2%,0,1,2 

510 ON SQ(2) GOSUB 380 

520 RETURN 

530 n2$=n2$ + FNm$(canal2$,canal2%) 

540 canal2%=canal2% + 1 

550 GOTO 480 

run 



Para ampliar information . . . 

Hay numerosas publicaciones de Indescomp y de otras editoriales en las que 
puede encontrar mas amplia information sobre el CPC464; en concreto, las es- 
pecificaciones de BASIC y del firmware. 

Finalmente vamos a ofrecerle tres apendices: un glosario de terminologia infor- 
maiica, los listados de unos cuantos programas y un indice alfabetico. 

Esperamos que haya encontrado este manual instructivo e interesante y le agra- 
decemos que haya adquirido el CPC464. 
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Apendice 1 

Lexico ingles-castellano y glosario 



Algunos terminos que se utilizan frecuentemente en infor- 
mdtica, explicados para los usuarios del CPC464. 



Accumulator Acumulador 

Una parte del microprocesador, en el corazon del ordenador, en el que se almacenan tempo- 
ralmente los datos mientras se los esta procesando. Se lo utiliza en la programacion en codi- 
go de maquina. Los usuarios de BASIC ni siquiera necesitan saber que existe. 



Acoustic coupler Acoplador aciistico 

Tambien denominado 'modem acustico'. Dispositivo electronico mediante el cual se puede 
conectar el ordenador a la red telefonica. De esta forma el ordenador se puede integrar en 
una red de comunicacion publica, o bien comunicarse con otros usuarios de ordenadores 
domesticos para el intercambio de information o programas. 



Address Direction 

Niimero que identifica la position de una celula de la memoria del ordenador. Mediante 
la direction se selecciona una celula concreta para leer su contenido o, en el caso de la me- 
moria RAM, para leer o escribir un valor en ella. 



Adventure game Juego de aventura 

Una pasion para algunos, un aburrimiento para otros. Un juego de ordenador en el que 
se invita al jugador a participar en una serie de sucesos pseudoaleatorios con el objetivo 
de salir de un laberinto. 



Algorithm Algoritmo 

Nombre grandilocuente que se da a una formula o a una suma complicada. Secuencia de 
operaciones logicas y aritmeticas con las que se realiza una determinada tarea informatica. 
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Alphanumeric Alfanumerico 

Adjetivo que describe la diferencia entre una letra o un di'gito y un caracter grafico. 

ALU (Arithmetic and Logic Unit) Unidad aritmetica y logica 

Parte del microprocesador que realiza las operaciones logicas y aritmeticas. De interes sola- 
mente para la programacion en codigo de maquina. 

Ambiguous File Name Nombre de fichero ambiguo 

Un nombre de fichero que contiene uno o varios simbolos comodin. Los nombres de fiche- 
ro ambiguos pueden representar al mismo tiempo varios ficheros cuyos nombres tienen algo 
en comun. 

AMSDOS 

AMStrad Disc Operating System. Sistema operativo de disco AMSTRAD. Es el programa 
que permite que el BASIC de Locomotive acceda a los ficheros de disco. 

AMSOFT 

Division de AMSTRAD especializada en el apoyo a los usuarios de los ordenadores; sumi- 
nistra programas, perifericos y publicaciones, especificamente con objeto de potenciar el 
CPC464 y sus muchas aplicaciones. 

Analog Analogico 

Adjetivo que caracteriza los fenomenos en los que las transiciones entre el estado inicial y 
el final se realizan de forma gradual o continua. Los ordenadores son dispositivos digitales, 
mientras que los fenomenos naturales son en su mayoria analogicos; asi pues, el ordenador 
tiene que realizar una conversion A/D antes de poder procesar los datos recibidos de una 
fuente analogica. 

Animation Animacion 

Los dibujos animados son el mejor ejemplo. La animacion en los ordenadores consiste en 
mover graficos por la pantalla, tratando de simular los movimientos de los seres reales. 
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Applications program Programa de aplicaciones 

Programa escrito para realizar una tarea especifica, a diferencia de los programas de 'utili- 
dad', tales como ensambladores, controladores de impresora, etc., que son de interes mas 
general. 



Arcade game Juego grafico de salon 

Juego de ordenador basado en el movimiento de graficos (invasores espaciales, monstruos 
al acecho en un laberinto, etc.). El usuario tiene que evitar la 'muerte' de los 'buenos'. Ge- 
neralmente sirven para ejercitar los reflejos, pero no tienen ningun valor didactico para los 
estudiantes de informatica. 



Architecture Arquitectura 

Termino que designa la organization general de un ordenador (relaciones entre el bus de 
datos, la UCP y los perifericos). 



Argument Argumento 

Una variable independiente. Por ejemplo, en SIN(x) la x es el argumento de la funcion SIN. 

Array Matriz 

Combination de elementos de un mismo tipo dispuestos en una o varias dimensiones. En 
el caso unidimensional se denominan 'vectores'. 

Artificial intelligence AI Inteligencia artificial 

Tecnica de programacion que permite al programa aprender por la experiencia. 

ASCII 

American Standard Code for Information Interchange. Codigo estadounidense estandar 
para el intercambio de information. Forma habitual de representar digitos, letras y otros 
simbolos mediante codigos numericos. 
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Assembler Ensamblador 

Programa que facilita la programacion en codigo de maquina. Las instrucciones son los 11a- 
mados 'nemonicos': grupos de letras que se recuerdan e interpretan facilmente porque dan 
una idea de la funcion que realiza cada instruction. 



Backup Copia de seguridad 

Copia que se hace de los programas o ficheros de datos en prevision de que se borre o dete- 
riore accidentalmente el original. 



Bar code Codigo de barras 

Codigo impreso legible por ordenador mediante tecnicas opticas tales como laser de baja 
potencia. (Ejemplo: el grupo de rayas verticales que se imprime en la cubierta de algunas 
revistas.) 



Base Base 

Es el numero de digitos que se utilizan en cada sistema de representation numerica. En el 
sistema decimal es 10; en el binario, 2; en el hexadecimal, 16. 



BASIC 

Beginners' All-purpose Symbolic Instruction Code. Codigo de instrucciones simbolicas de 
uso general para principiantes. Es un lenguaje de programacion interpretado que se incor- 
pora en la mayor parte de los ordenadores domesticos. BASIC fue disenado primordial- 
mente como ayuda para la ensefianza, pues permite la comprobacion de los programas en 
cualquier momento de su desarrollo. En esto se distingue de los programas compilados, que 
no pueden ser probados parcialmente mientras el programa no este complete 



Baud Baudio 

Unidad de medida de la velocidad de transmision de datos. Es un concepto distinto del de 
bit por segundo, aunque en muchos casos sus valores coinciden. 



BCD (Binary Coded Decimal) Decimal codificado en binario 

Sistema de codification para mimeros decimales en el que cada digito se representa por un 
grupo de cuatro bits. 
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BDOS 

Basic Disc Operating System. Sistema operativo basico de disco. Parte del sistema operati- 
ve) CP/M que proporciona un interfaz para que el programa del usuario pueda utilizar las 
funciones de CP/M. 



Benchmark Prueba patron 

Una tarea estandar que se realiza con distintos ordenadores para comparar su velocidad, 
precision, etc. Por ejemplo, elevar al cuadrado el numero 99999 y luego calcular la raiz 
cuadrada. 



Binary Binario 

Sistema de numeration de base 2, en el que los niimeros se representan como combina- 
ciones de solamente dos digitos: el y el 1. (Vease la parte 1 del capitulo 'Cuando usted 
guste ...'.) 



Binary number Numero binario 

Un numero representado en el sistema binario. En el BASIC del CPC464 se los identifica 
por el prefijo &X; por ejemplo, &X0101 = 5(detimal). 



BIOS 

Basic Input/Output System. Sistema basico de entrada/salida. Es la parte de CP/M que se 
escribe especificamente para cada ordenador concrete Gestiona todas las entradas y sali- 
das: pantalla, teclado, disco, etc. 



Bit 

Forma abreviada de Binary digiT (digito binario). Un digito binario es uno de los dos sim- 
bolos (el y el 1) con los que se representan los niimeros en el sistema de base 2. 



Bit significant Interpretable bit a bit 

Hace referenda a los casos en los que se puede extraer information de un numero exami- 
nando el estado de cada uno de sus bits. El valor global en decimal no tiene significado 
evidente. 
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Boolean algebra Algebra de Boole 

Estructura algebraica sobre variables que pueden tomar dos valores distintos: verdade- 
ro/falso, 1/0, etc. 



Boot Carga inicial 

Proceso de carga de un sistema operativo en la memoria del ordenador. Cuando se carga 
CP/M desde BASIC, lo primero que se lee es un pequeno programa autocargador, el cual 
realiza la carga del sistema operativo propiamente dicho. 



Booting, Bootstrapping Autocarga 

Los programas y sistemas operativos no se cargan a si mismos, sino gracias a una rutina 
(generalmente grabada en ROM) que inicia el proceso de carga a partir de una determinada 
position de memoria. 



Buffer Tampon 

Area de memoria reservada para el almacenamiento temporal en los procesos de transferen- 
cia de la information. 



Bug Error de programacion 

Un problema no previsto en un programa: puede ir desde una 'caracteristica inesperada' 
(por ejemplo, si se pulsan cuatro teclas a un tiempo la pantalla cambia de color) hasta una 
secuencia de instrucciones que provoca la perdida del control de la maquina. 



Built-in commands Ordenes internas o incorporadas 

Ordenes que forman parte del sistema operativo. Son de ejecucion mas rapida que las orde- 
nes externas, pues no tienen que ser cargadas del disco. 



Bus 

Grupo de conexiones, internas al ordenador o de entrada/salida, por las que se transmite 
information acerca del estado de la UCP, de la RAM o de cualquier otra parte del hardwa- 
re. EL bus del CPC464 es accesible a traves del zocalo EXPANSION que esta en la cara 
posterior del ordenador. 
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Byte Byte, octeto 

Grupo de 8 bits. Es la menor portion de information que una UCP puede intercambiar con 
la memoria. 



CAD, Computer Aided Design Diseno asistido por ordenador 

Generalmente, un programa interactivo que convierte el ordenador en un tablero de dibujo 
electronico que ademas es capaz de realizar calculos matematicos. 



Cartridge Cartucho 

Dispositivo de memoria externo compacto conectable al ordenador (v. g., programas en 
ROM, cuya ventaja es la gran velocidad de carga, pero que son mas caros que los suminis- 
trados en disco). 



Cassette 

Cinta encapsulada, ya sea virgen o con programas comerciales. 

CCP Interprete de consola 

Console Command processor. Procesador de ordenes de consola. Es el modulo de CP/M 
que interpreta y ejecuta las entradas por el teclado. 

Character Caracter 

Cualquier simbolo que pueda ser manejado y visualizado por el ordenador: digitos, letras 
y otros signos, incluidos los simbolos graficos. 

Character set Juego de caracteres 

Conjunto de todos los signos y simbolos disponibles en un ordenador o una impresora. El 
hecho de que un ordenador tenga un simbolo determinado no implica que este sea reprodu- 
cible en la impresora. 

Character string Cadena literal 

Grupo de caracteres que pueden ser almacenados y tratados en bloque, v. g. una palabra 
o grupo de palabras. 
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Chip Pastilla 

Termino popular, aunque incorrectamente utilizado, para designar un circuito integrado 
monolftico. La 'pastilla' es en realidad un trozo de silicio en el que se graba el circuito. 



Clock Reloj 

Sistema temporizador de referenda del ordenador que controla y sincroniza la secuencia 
de operaciones. Un reloj de tiempo real es el que mantiene la hora, fecha, etc. 



Code Codigo 

Aparte de otros significados, forma abreviada de referirse al 'codigo de maquina'. 

Cold start Arranque en frio 

Proceso de carga e inicializacion de un sistema operative El arranque en frio de CP/M se 
realiza cuando se ejecuta la orden ICPM de AMSDOS. 

Command Orden 

Instruccion de programa o instruccion directa de teclado. 

Compiler Compilador 

Un programa complejo que convierte programas completos escritos en un lenguaje de alto 
nivel, tal como BASIC, en codigos directamente utilizables por el microprocesador, con el 
consiguiente incremento de la velocidad de ejecucion. 

Computer Aided Education Ensenanza asistida por ordenador 

Programa que facilita la ensenanza en general sirviendose de los ordenadores. 

Computer generations Generaciones de ordenadores 

Diversos hitos tecnologicos han delimitado las etapas de la evolution de la tecnologia infor- 
matica; los ordenadores fabricados con un nivel de sofisticacion similar forman una 
'generation'. 
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Console mode Modo de consola 

Modo directo de CP/M; en la pantalla aparece el mensaje inductor A) para indicar que 
el sistema esta esperando que se teclee una orden interna o el nombre de un programa de 
ayuda. 



Corruption Corruption 

Destruction o alteration del contenido de un fichero o de la memoria, indeseada y posible- 
mente irremediable. 



CP/M 

Control Program for Microcomputers. Programa de control para microordenadores. Siste- 
ma operativo basado en disco, desarrollado por Digital Research, que proporciona un in- 
terfaz con el que utilizar una gran variedad de programas. 



CPU, Central Processing Unit Unidad central de proceso 

Nucleo del sistema informatico que interpreta las instrucciones y hace que sean obedecidas. 
En los microordenadores la UCP es el propio microprocesador. 



Cursor 

Simbolo movil que indica en que lugar de la pantalla aparecera el proximo caracter que se 
en vie a ella. 



Cursor control keys Teclas de movimiento del cursor 

Teclas con las que se hace que el cursor se mueva por la pantalla. Frecuentemente se las 
utiliza tambien en los juegos graficos. 



Daisy-wheel printer Impresora de margarita 

Impresora que escribe con calidad de maquina de escribir. Los caracteres estan preforma- 
dos, cada uno en un brazo de la 'margarita', y se los transfiere al papel al golpear el brazo 
con un martillo. 
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Database Base de datos 

Coleccion de datos estructurados, integrados y coherentes, utilizables por el ordenador. 

Data capture Captation de datos 

Recoleccion de datos enviados al ordenador desde fuentes externas. 

Debugging Depuration 

Proceso de detection y elimination de errores de los programas. 

Decimal notation Notation decimal 

Sistema decimal de numeration, de base 10, que utiliza los digitos del al 9. Es el sistema 
ordinario. 

Default Prescrito, implicito, por defecto 

Valor que el ordenador supone en ausencia de otra especificacion por parte del usuario. Por 
ejemplo, en CP/M la unidad de disco implicita es la A:. 

Delimiter 

Vease Separator. 

Diagnostic Diagnostico 

Mensaje emitido automaticamente por el ordenador para senalar e identificar un error de 
un programa. 



Digital 

Es el termino opuesto a 'analogico'. Describe la transition brusca entre dos estados de un 
proceso. 
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Digitiser Digitalizador 

Metodo de conversion de information analogica en digital. 

Directory Directorio 

Section de un disco que contiene las resenas (titulos y caracteristicas) de los ficheros graba- 
dos en el. Lista del contenido de un disco. 

Disc, disk Disco 

Hoja de plastico circular, fina y plana, recubierta de material magnetico, que se utiliza co- 
mo medio de almacenamiento de la information. El disco esta incluido en una envoltura 
protectora en la que hay una 'ventana' para la cabeza lectora. En el disco de 3 pulgadas 
la ventana esta cubierta por un obturador metalico que se abre automaticamente cuando 
se introduce el disco en la unidad. 

Disc drive Unidad de disco 

Mecanismo y circuitos electronicos con los que se mueve el disco para leer o grabar datos 
en el. 

Documentation Documentacion 

Manuales suministrados con los ordenadores o los programas, en los que se explica su 
funcionamiento. 

DOS (Disc Operating System) Sistema operativo basado en disco 

Programas que controlan todas las operaciones de la unidad de disco. 

Dot matrix Matriz de puntos 

Reticula rectangular de puntos con la que se puede visualizar cada caracter seleccionando 
los puntos adecuados. 

Double sided De doble cara 

Hace referencia a los discos en los que se puede almacenar information en ambas caras. 
Una unidad de doble cara puede acceder a ambas caras del disco sin necesidad de extraer 
y darle la vuelta a este. 
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Dr. LOGO 

Version de LOGO elaborada por Digital Research. LOGO es un lenguaje de programacion 
caracterizado por sus 'graficos de tortuga'. 



Dumb terminal Terminal pasivo 

Terminal de ordenador que actua solamente como medio de entrada o salida, pero sin pro- 
cesar la information. 



Edit Editar, corregir 

Corregir o modificar datos, programas o textos. 

Editor 

Un programa, generalmente grabado en la ROM del ordenador, que permite realizar el pro- 
ceso de edition. 

EPROM 

Erasable Programmable Read only Memory. Memoria borrable y programable de 'solo lec- 
tura'. Similar a la PROM, pero tal que su contenido se puede borrar con luz ultravioleta 
para luego grabar en ella un nuevo programa. Una EEPROM puede ser borrada por medios 
electronicos. 

Expression Expresion 

Formula utilizada en un programa para realizar cierta operation con los datos. La propia 
expresion indica normalmente la naturaleza de los datos que puede manejar. En Dr. LOGO 
una expresion consiste en el nombre de un procedimiento seguido de las entradas 
requeridas. 

Fifth generation computers Ordenadores de la quinta generation 

Grandes ordenadores que estaran disponibles en el futuro y tendran, como caracteristica 
distintiva, la capacidad de utilizar ampliamente las tecnicas de la inteligencia artificial. 
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File Fichero 

Coleccion de datos, de estructura homogenea, generalmente grabada en cinta o disco. 

File name Nombre de fichero 

En Dr. LOGO el nombre de un fichero puede estar formado por un maximo de 8 caracteres 
alfanumericos. En CP/M se permiten otros tres caracteres, precedidos por un punto. 

Firmware 

Software contenido en ROM: un hibrido de software y hardware. 

Fixed-point number Niimero en coma fija 

Un niimero que se representa, manipula y almacena con el punto decimal en una posicion 
determinada. 

Floating-point number Niimero en coma flotante 

Numero que se representa, manipula y almacena con la coma decimal en la posicion mas 
conveniente (en forma de mantisa y exponente). 

Floppy disc 

Vease Disc. 

Flowchart Ordinograma 

Representation esquematica de la evolution de las acciones de un programa. 



Forth 

Lenguaje de programacion de alta velocidad de ejecucion. Tanto la velocidad como la com- 
plejidad estan a medio camino entre los lenguajes de alto nivel y el codigo de maquina. No 
es un lenguaje para principiantes. 



Lexico ingles-castellano y glosario A 1/1 3 



Function key Tecla de funcion 

Tecla que tiene asignada una tarea especifica, que puede ejecutar en lugar (o ademas) de 
la funcion grabada sobre ella. 

Gate Puerta logica 

Las puertas logicas permiten el paso de datos cuando se cumplen ciertas condiciones. Hay 
varios tipos de puertas logicas: OR, AND, XOR, etc. 

Graphics Graficos 

Dibujo de puntos, rectas, circunferencias, etc.; es decir, todo lo que aparece en la pantalla 
que no sean 'caracteres'. 

Graphics character Caracter grafico 

Simbolo asignado a un caracter que es en si mismo un dibujo. 

Graphics cursor Cursor grafico 

Concepto similar al de 'cursor de texto', pero invisible (en el 464) y referido a la pantalla 
grafica. 

Graphics mode Modo grafico 

Los ordenadores mas antiguos tenian que ser puestos explicitamente en este modo para po- 
der manejar graficos. En cambio, los ordenadores personales modernos pueden mezclar 
textos con graficos. 

Graphics tablet Tablero grafico 

Periferico que convierte un dibujo en una forma manipulable por el ordenador. Es una for- 
ma de conversion A/D (analogica a digital). 

Handshaking Intercambio de indicativos y senales de control 

Secuencia de senales electronicas que inicia, comprueba y sincroniza el intercambio de da- 
tos entre un ordendor y un periferico o entre dos ordenadores. 
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Hard copy Copia en papel 

Listado por impresora de un programa o un texto, o volcado en papel de la pantalla grafica. 

Hardware Equipos, maquinas 

Componentes electronicos o mecanicos de un sistema informatico: todo lo que tiene volu- 
men y peso. 

Hexadecimal (HEX) 

Sistema numerico de base 16. Los numeros hexadecimales se identifican en el CPC464 por 
los prefijos & y &H. Por ejemplo, &FF=255 (decimal). (Vease la parte 1 del capitulo 'Cuan- 
do usted guste ...'.) 

Hex file Fichero HEX 

Representation ASCII de un fichero de orden externo o de codigo de maquina. 

High-level language Lenguaje de alto nivel 

Lenguajes del tipo de BASIC, en los que las instrucciones son mas proximas al lenguaje 
ordinario. Son mas lentos que el codigo de maquina, pero mucho mas sencillos de entender 
y programar. 

IEEE-488 

Uno de los interfaces estandar para la conexion de dispositivos externos a un ordenador. 
Similar al Centronics, pero no totalmente compatible con el. 

Information technology Tecnologia de la informacion 

Todo lo relativo a la utilization de los ordenadores en el proceso de la informacion y las 
comunicaciones: proceso de textos, transmision de datos, videotexto, teletexto, etc. 

Initialise Inicializar 

Poner en marcha un sistema. O dar valores concretos a variables antes de empezar la ejecu- 
cion del nucleo central de un programa; por ejemplo, dimensionar matrices, declarar tipos 
de variables, etc. 
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Input Entrada 

Datos de todo tipo que entran en el ordenador procedentes del disco, del teclado, de una 
puerta RS-232, etc. 



Instruction Instruction 

Orden que manda al ordenador que realice alguna operation o tarea. Un conjunto de ins- 
trucciones forma un programa. 



Instruction set Juego de instrucciones 

Conjunto de procesos logicos y matematicos fundamentales que puede realizar el micropro- 
cesador. Toda instruction de un lenguaje de alto nivel (y tambien los nemonicos de ensam- 
blador) tiene que ser convertible a una instruction o serie de instrucciones que la UCP pue- 
da reconocer. 



Integer Entero 

Numero sin parte decimal. 

Integrated circuit Circuito integrado 

Conjunto de componentes electronicos miniaturizados, grabados en una pastilla de silicio. 
(Vease tambien Chip.) 

Intelligent terminal Terminal inteligente 

Un terminal que, ademas de gestionar entradas y salidas para un ordendor central, puede 
realizar ciertas tareas de proceso de datos cuando el ordenador esta 'fuera de linea'. 

Interactive Interactive 

Hace referencia a los programas que solicitan del usuario la introduction de information 
de modo inmediato: desde el control de naves espaciales en juegos graficos hasta las res- 
puestas en programas educativos. La action del usuario tiene efecto en 'tiempo real' sobre 
la evolution del programa. 
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Interface Interfaz 

Via de entrada y salida del ordenador, tanto para las senales electricas como para las accio- 
nes y reacciones del usuario. En el CPC464, el teclado, la pantalla y las conexiones para 
perifericos. 



Interpreter Interprete 

Una analogia mas entre las instrucciones de ordenador y los idiomas. Es el elemento del 
sistema que interpreta el lenguaje de alto nivel y lo convierte a una forma utilizable por 
UCP de modo inmediato. 



I/O Entrada/Salida (E/S) 

Input/output. Entrada/Salida. 

Iteration Iteracion 

Uno de los mecanismos basicos de la informatica. Consiste en la repetition de tareas (bu- 
cles), en las que generalmente se va modificando el valor de una variable, hasta que se cum- 
ple determinada condition. 

Joystick Bastoncillo de mando 

Dispositivo de entrada al ordenador que generalmente sustituye las teclas del cursor y hace 
que los juegos graficos sean mas faciles y rapidos de controlar. 



K 

Forma abreviada y aproximada del prefijo 'kilo' (1000). Representa un 'kilobyte', que en 
realidad es 1024 bytes. (1024 es la base del sistema binario, 2, elevada a la decima potencia.) 



Keyboard Teclado 

Matriz de interruptores alfanumericos a traves de la cual se introduce information en el 
ordenador. 
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Keyword Palabra clave 

Palabra que un programa o lenguaje de programacion reserva para una funcion u orden 
especi'fica. 



Least significant bit Bit menos significativo 

En un mimero binario, el bit de menor peso; es decir, el que esta mas a la derecha en la 
representation matematica habitual. 



Light pen Lapiz optico 

Otro dispositivo de entrada al ordenador que sirve para indicar una selection de zonas de 
la pantalla o para leer codigos de barras. 



Line number Niimero de linea 

Los programas de BASIC y de algunos otros lenguajes tienen las instrucciones numeradas 
para indicar al ordenador el orden de ejecucion. 



LISP 

Acronimo de 'LISt Processor language' (lenguaje de proceso de cadenas de predicados). 
Otro lenguaje de alto nivel. 



Logic Logica 

Entre otras acepciones, conjunto de componentes electronicos que realizan las operaciones 
logicas elementales en las que en ultimo termino se basa el funcionamiento del ordenador. 



Logical device Dispositivo logico 

La representation de un dispositivo puede no coincidir con su forma fisica. Por ejemplo, 
el dispositivo logico LST de CP/M puede ser asignado a la puerta Centronics, pero tambien 
a la pantalla del monitor. 
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LOGO 

Nombre de un lenguaje de programacion tornado del termino griego 'logos', que significa 
'palabra'. LOGO ha sido disenado para servir como ayuda en la enseftanza de la informati- 
ca elemental. 



Loop Bucle 

Section de un programa que se ejecuta reiteradamente hasta que se cumple determinada 
condition. 



Low-level languaje Lenguaje de bajo nivel 

Por ejemplo, el lenguaje ensamblador. Un lenguaje en el que cada instruccion corresponde 
a una instruccion de codigo de maquina. 



LSB, Least Significant Bit Bit menos significativo, bms 

En un numero binario, el bit de menor peso, es decir, el que esta mas a la derecha en la 
representation matematica habitual. 



LSI, Large Scale Integration Integration a gran escala 

Etapa avanzada del desarrollo de circuitos integrados, en la que incorporan miles de com- 
ponentes electronicos en una sola pastilla de silicio. 



Machine code Codigo de maquina 

Lenguaje de programacion que es directamente comprensible y utilizable por el micropro- 
cesador. 



Machine readable Accesible a la maquina 

Este termino hace referenda a datos e information que puedan ser introducidos directa- 
mente en la maquina, sin necesidad de conversion. 



Man-machine interface Interfaz hombre-maquina 

Dispositivo que facilita la interaction entre el usuario y el ordenador (teclado, sonido, etc.) 
Lexico ingles-castellano y glosario A 1/1 9 



Matrix Matriz 

Disposition de los puntos con los que se forman los caracteres en la pantalla o en las impre- 
soras de 'matriz de puntos'. En otra acepcion, variables que con un solo nombre pueden 
contener multiples valores, a los que se accede mediante los 'indices'. 



Memory Memoria 

Especie de 'aparcamiento' en la maquina, en la que esta almacena los programas y los da- 
tos. La memoria puede ser RAM (memoria de acceso aleatorio), en la que se puede escribir 
y leer, o ROM (memoria de 'solo lectura'), en la que solamente se puede leer. 

Memory map Mapa de memoria 

Esquema en que se indica que zonas de memoria estan dedicadas a las diversas funciones: 
pantalla, sistema operativo, variables, etc. 

Menu Menu 

Lista de opciones que se ofrece al usuario de un programa. 

Microprocessor Microprocesador 

Circuito integrado que controla el funcionamiento del ordenador. Recibe y ejecuta las ins- 
trucciones que le entrega el interprete de BASIC y controla todas las interfaces. 

Modem, Modulator/Demodulator Modulador/demodulador, modem 

Dispositivo que permite conectar el ordenador a una linea telefonica o comunicarlo con 
otros ordenadores o terminales remotos. 

Monitor 

Pantalla en la que se visualizan los graficos, listados, mensajes, etc. Tambien el programa 
que permite observar la operation basica del ordenador. 

Mouse Raton 

Seguidor boca abajo, o bola rodante. Al desplazarlo con la mano sobre una superficie pla- 
na, mueve el cursor por la pantalla. 
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MSB, Most Significant Bit Bit mas significativo, BMS 

En un numero binario, el bit de mayor peso; es decir, el que esta mas a la izquierda. 

Network Red 

Cuando se interconectan varios ordenadores para intercambiar programas y datos, via mo- 
dem, cable, etc., se forma una 'red'. 

Nibble Cuarteto 

Medio byte, es decir, un numero binario de cuatro bits. 

Node Nodo 

Unidad de espacio de trabajo en LOGO. Generalmente un nodo consume 4 bytes de espacio 
de memoria. 

Noise Ruido 

El sistema de sonido del CPC464 permite generar ruidos aleatorios para simular efectos so- 
noros tales como explosiones, disparos, etc. 

Numeric keypad Teclado numerico 

Grupo de teclas numericas destinadas a facilitar la introduccion de numeros en el ordena- 
dor. En el caso del CPC464, estas teclas son ademas definibles por el usuario. 

OCR, Optical Character Recognition Lectura optica de caracteres 

Sistema de lectura automatica de caracteres escritos y de conversion a datos utilizables por 
el ordenador. 



Octal 

Sistema de numeracion de base 8 en que cada digito (del al 7) se presenta con tres digitos 
binarios. 
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Off line Fuera de linea 

Situation en la que se encuentra un periferico cuando no esta activamente conectado al 
ordenador. 



On line En linea 

Termino opuesto a Off line/Fuera de linea. 

Operating system Sistema operativo 

Programa que gestiona el manejo de la memoria, la ejecucion de programas, prioridades, 
control de tiempos, etc. Interfaz entre la maquina y los programas del usuario. 

Operator Operador 

Parte de una operation aritmetica o logica que describe en que consiste la operation. 

Output Salida 

Todo lo que sale del ordenador como resultado de algun proceso o calculo. 

Overwrite Sobreescribir 

Escribir borrando lo anterior. Borrar parte de la memoria o la pantalla, a veces involunta- 
riamente, al escribir nuevos datos en ella. 

Paddle Empunadura 

Mando principal del joystick. 

Page zero Pagina cero 

Zona de memoria, en CP/M entre las posiciones &0000 y &0100, en la que se almacenan 
parametros esenciales del sistema operativo. 
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Parallel interface Interfaz paralelo 

Sistema de conexion del que es ejemplo el interfaz para impresora del CPC464. Cada linea 
del bus de datos se conecta a la correspondiente patilla del corrector de la impresora. Los 
datos se transmiten en grupos simultaneos. Este metodo de transmision es mucho mas rapi- 
do que el que se consigue con un interfaz serie, en que los digitos binarios se envian uno 
tras otro, por una sola linea. 



Pascal 

Lenguaje estructurado de alto nivel que ha de ser compilado antes de su ejecucion y que, 
por consiguiente, es muy rapido. Es el lenguaje que habitualmente se estudia despues de 
BASIC. 



PEEK 

Funcion de BASIC que examina una position de memoria especificada e informa de su 
contenido. 



Peripheral Periferico 

Impresoras, modems, joysticks, magnetofonos, etc.; cualquier aparato que pueda ser co- 
nectado al ordenador para hacerlo mas util. 



Physical device Dispositivo fisico 

Dispositivo que realmente existe (o sea, pieza de hardware), representable por un dispositi- 
vo logico. 



Pixel (picture element) Punto grafico 

La menor area de la pantalla que puede ser controlada con independencia de las demas. 

Plotter Trazador automatico 

Trazador especial que dibuja con plumas, tanto caracteres como dibujos propiamente 
dichos. 
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POKE 

Orden de BASIC que escribe un valor en una position de memoria especificada. 

Port Puerta 

Lugar especificamente direccionable de un interfaz para la entrada o salida de datos. 

Portability Adaptabilidad 

Caracteristica de un lenguaje o programa que hace facil su adaptation a otra maquina, ge- 
neralmente como consecuencia de la compatibilidad del sistema operativo (v. g., el CP/M 
de Digital Research). 

Primitives Primitivas 

Procedimientos, operaciones u ordenes basicos en los que consiste Dr. LOGO. 

Printer Impresora 

Maquina que escribe en papel los datos enviados por el ordenador. 

Procedure Procedimiento 

Serie de expresiones o instrucciones que indican al ordenador como realizar una tarea. 

Program Programa 

Conjunto de instrucciones que gobiernan el funcionamiento del ordenador para hacer que 
realice una tarea. Puede tratarse de una simple rutina en codigo de maquina o de una apli- 
cacion completa, tal como un paquete de contabilidad o un procesador de textos. 

Programming language Lenguaje de programacion 

Lenguaje en el que escribe un programa, consistente en un conjunto de reglas que indican 
como se utilizan las palabras y los numeros. 
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PROM 

Programmable Read Only Memory. Memoria programable de 'solo lectura'. Circuito inte- 
grado de memoria que, una vez grabado, ya no se puede borrar. (Vease tambien EPROM.) 



Prompt Mensaje inductor 

Un corto mensaje o grupo de caracteres que recuerda al lector que el ordenador esta espe- 
rando una entrada. Por ejemplo, en CP/M es >; en LOGO, ?. 



PSU, Power Supply Unit Fuente de alimentation 

Circuito que convierte la tension alterna de la red a una tension continua adecuada para 
los circuitos del ordenador (y de los perifericos). 



QWERTY keyboard Teclado tipo QWERTY 

Teclado del tipo de las maquinas de escribir estandar. 

RAM 

Random Access Memory. Memoria de acceso aleatorio. Memoria de la que se puede leer 
y en la que se puede escribir en el curso normal de la ejecucion de un programa, en cualquier 
direction y en cualquier orden. 

Random access Acceso aleatorio 

Termino que hace referencia a la posibilidad de leer o escribir datos en un disco en el orden 
que se desee. 

Random number Numero aleatorio 

Numero generado por el ordenador que no es ni repetible ni predecible. El CPC464 genera 
una sucesion de numeros pseudoaleatorios. 

Raster scan Barrido de trama 

Sistema de 'escritura' en la pantalla, en que las imagenes se forman mediante un barrido 
de lineas horizontales. 
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R/O, Read only De 'solo lectura' 

Atributo de un disco, de un fichero, de una unidad de disco, etc., que impide la escritura 
y la modificacion de los datos. 



R/W, Read write De lectura/escritura 

Atributo de un disco, de un fichero o de una unidad de disco que permite tanto la lectura 
como la escritura o la modificacion de los datos. 



Real number Numero real 

Niimero que consta (o puede constar) de parte entera y parte decimal. 

Real time En tiempo real 

Efectos que ocurren en el momento presente, a diferencia de aquellos que solo se aprecian 
cuando ha terminado el proceso que los provoco. 

Record Registro 

Unidad de medida de ficheros. En CP/M los registros son de 128 bytes. 

Recursion Recursividad 

Serie de etapas repetidas de un programa o una rutina, tales que cada una esta relacionada 
con la anterior. 

Refresh Renovacion, refresco 

Actualization de la information, ya sea de la pantalla o de la memoria. No siempre es un 
proceso destructivo; puede tratarse de una confirmation de la situation actual, en dispositi- 
vos que de otro modo perderfan la informacion. 

Register Registro de maquina 

Position de memoria transitoria de la UCP utilizada para almacenamiento provisional de 
los datos. 
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REM, Remark Comentario, observation 

Instruction de un programa que el ordenador no ejecuta; sirve para que el programador 
escriba anotaciones, o para escribir la fecha o niimero de version del programa. 



Reserved word Palabra reservada 

Una palabra que tiene un significado especial para un programa, y que por consiguiente 
no se puede utilizar fuera del contexto predefinido. Por ejemplo, BASIC no puede aceptar 
NEW como nombre de una variable, pues esa palabra esta reservada para otro proposito. 



Resolution Resolution 

La resolucion es tanto mayor cuanto menor sea el tamano de los pixels. Da una idea de 
como de 'finos' pueden ser los graficos en un ordenador. 



Reverse Polish notation Notation polaca inversa 

Metodo de escribir operaciones aritmeticas, adoptado por ciertos fabricantes de calculado- 
ras, en el que los operadores (+, -, *, /) se ponen despues de los operandos. 



RF Modulator Modulador de radiofrecuencia 

Metodo por el cual las sefiales de video del ordenador se codifican y transmiten a la entrada 
de antena de un televisor. 



ROM 

Read only Memory. Memoria de 'solo lectura'. Memoria que no se puede borrar. 

Routine Rutina 

Una parte del programa que realiza una tarea especifica. Un subprograma contenido en un 
programa mas general, o que se ha escrito de forma independiente y puede ser incorporado 
a otros programas. 
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RS-232C 

Un sistema concreto estandarizado para los interfaces de comunicacion en serie. Los dispo- 
sitivos que estan en los dos extremos de la linea deben estar configurados de acuerdo con 
las normas E1A RS-232C. 



Screen editor Editor de pantalla 

Editor de textos o de programas que permite llevar el cursor a cualquier lugar de la pantalla 
para modificar su contenido. 



Scrolling Desplazamiento vertical, rodadura 

Termino que describe la forma en que la pantalla 'rueda' hacia arriba cuando se ha llegado 
a la ultima linea y se necesita una nueva. 



Sector 

Memoria minima direccionable en un disco. El sistema de AMSTRAD esta basado en secto- 
res de 512 bytes. 



Separator Separador 

Signo que marca el lfmite entre palabras reservadas y otros elementos del programa. 

Serial interface Interfaz serie 

Este termino hace referenda normalmente al estandar RS-232C, aunque existen otros meto- 
dos de transmision en serie de datos. 

Simulation Simulacion 

Tecnica de emulation de los procesos reales en un ordenador; por ejemplo, simulacion de 
vuelo, de la conduction de automoviles, etc. 

Singled sided De una sola cara 

Hace referenda al tipo de disco en el que solo se pueden grabar datos en una cara. 
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Software Programacion, software 

Conjunto de programas que hacen que el ordenador funcione; en disco, cinta, ROM, 
etcetera. 



Software engineering Ingenieria de programacion 

Tecnicas de programacion consideradas desde un punto de vista cientffico, para distinguir- 
las de las no organizadas o arbitrarias. 



Sound generator Generador de sonido 

Parte de un ordenador (circuitos o programas) que genera sonido y ruido. 

Speech recognition Reconocimiento de voz 

Conversion de la palabra hablada en information reconocible por el ordenador. 

Speech synthesis Sintesis de voz 

Generation de voces simuladas mediante una combination de circuitos y programas. 

Spread sheet Hoja electronica 

Un programa que permite introducir datos numericos para disponerlos en filas y columnas 
y para hacer con ellos manipulaciones aritmeticas. Al modificar uno de los datos se rehacen 
los calculos para actualizar los resultados por filas y columnas. 

Sprite Agente grafico movil 

Objeto grafico que se puede mover libremente por la pantalla, generado por software o por 
hardware de forma tal que pueda aparecer y desaparecer de modo aparentemente aleatorio. 

Stack PHa 

Area de memoria utilizada para almacenar datos provisionalmente y organizada de forma 
que el ultimo dato depositado en ella es el primero que se recupera. 
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Stream Canal 

Via de salida del ordenador; por ejemplo, la pantalla, la impresora o el disco. 

String Cadena literal 

Un objeto formado por caracteres cualesquiera que el programa no puede tratar como nu- 
merico. Puede constar solamente de digitos, pero el ordenador no lo considera como niime- 
ro mientras no se lo convierta a niimero mediante la instruccion adecuada. 

Structured programming Programacion estructurada 

Tecnica de programacion logica y premeditada con la que se escriben programas que fluyen 
de principio a fin en etapas bien diferenciadas. 

Sub-routine 

Vease Routine, rutina. 

Syntax error Error de sintaxis 

Cuando se infringen las reglas sobre la utilizacion de palabras clave y variables, BASIC 
emite este mensaje. 

System tracks Pistas del sistema 

Pistas reservadas en el disco para el sistema CP/M. 

Terminal 

Teclado de entrada con pantalla, o bien con teletipo de salida. 

TPA, Transient Program Area Area para programas transitorios 

Area de memoria que empieza en &0100, en la que en CP/M se almacena los programas 
de usuario y los datos por estos generados. 
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Track Pista 

Las pistas son coronas circulares del disco. Cada una se divide en un numero fijo de secto- 
res. Las pistas y sectores se inscriben en areas especificas del disco en el proceso de 
inicializacion. 



Transient program Programa transitorio 

Un programa de ayuda de CP/M, tal como PIP, que puede ser cargado en la TPA sin mas 
que escribir su nombre en el teclado. 



Truncated Truncado 

Hace referenda a un numero o una cadena que han sido recortados por la izquierda o por 
la derecha. Cuando el truncamiento es intencionado, suele incluir el redondeo del numero. 
Si es intencionado, los caracteres sobrantes se eliminan para encajar el numero o la cadena 
en el espacio disponible. 



Truth table Tabla de verdad 

El resultado de toda operacion logica puede ser 'verdadero' o 'falso' (para el ordenador, 
1 o 0). La tabla de verdad da todos los resultados posibles de la operacion en funcion del 
valor de los operandos. 



Turtle Tortuga 

Un simbolo con forma de punta de flecha que funciona como cursor grafico en la pantalla 
grafica de Dr. LOGO. 



Turtle graphics Graficos de tortuga 

Imagen que deja la tortuga de Dr. LOGO al moverse por la pantalla. 

UDK, User Defined Keys Teclas definidas por el usuario 

En el CPC464 hay 32 teclas a las que se pueden asignar tareas concretas, que el ordenador 
realiza en cuanto el usuario las pulsa. 
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Unsigned number Numero entero sin signo 

Numero entero interpretado como positive 

Utility Programa de ayuda 

Un programa completo con el que se realiza una operation comiin a varias aplicaciones; 
por ejemplo, ordenar alfabeticamente o copiar ficheros. 

Variable 

Un dato o grupo de datos puede ser identificado en un programa mediante un nombre; su 
valor puede variar como consecuencia de la ejecucion del programa. 

Warm start Arranque en caliente 

Es el que se realiza cuando se pulsa IctrlC en CP/M. Reinicializa el subsistema de disco 
y devuelve el control al modo directo de consola de CP/M. 

Wildcard character Simbolo comodin 

Este termino hace referencia a los simbolos * y ?. Dr. LOGO solamente admite el ?. El 
* representa cierto numero de simbolos ?. Al mencionar nombres de ficheros, se pueden 
construir nombres ambiguos poniendo simbolos ? en lugar de caracteres. 

Write protection Proteccion contra escritura 

Un mecanismo que impide escribir en un disco o fichero. Un disco protegido contra escritu- 
ra es un disco de 'solo lectura'. 
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Apendice 2 

Que usted lo disfrute 



Rebotes 

Sencillo y apasionante. Para un jugador contra el ordenador. Teclado o joystick. 

10 'REBOTES, por Alexander Martin 

20 "copyright (c) AMSOFT 1984 

30 ' 

40 MODE 1: BORDER 1:INK 0, 1: INK 1,26: INK 2,24: INK 3,6 

50 SPEED KEY 15,2 

60 ENV 1, 1, 18,0, 11,0, 10 

70 ENT 1, 10,2,2 

80 ENV 3,1,0, 16,5,-3,2 

90 ENV 2,5,3,3,1,-21,22,9,-3,2 

100 ENT -2,10,2,2,5,-7,1,2,11,3,2,-4,8 

110 ' 

120 ' 

130 MOVE 30,32:DRAVR 0,400,1: MOVE 610,32:DRAVR 0,400,1 

140 PEN 3: LOCATE 3,1: PRINT STRINGS (36, 143) 

150 PEN 2: LOCATE 3, 2: PRINT STRINGS (36, 143) 

160 PEN 1:F0R r=5 TO 6: LOCATE 3, r: PRINT STRINGS (36, 143) : NEXT 

r 
170 bx=9 

180 pelotas=5: puntos=0 
190 PEN 1:G0SUB 680 

200 IF INKEY$OCHRS(32) AND JOY(0)<16 THEN 200 
210 LOCATE 3, 23: PRINT SPACES (36) : LOCATE 1,24: PRINT SPACES (40) 

J 

220 GOSUB 690:GOSUB 660: GOTO 280 

230 ' 

240 ' 

250 LOCATE bx, 24: PRINT" "; STRINGS (4, 131) ; " ": RETURN 

260 ' 

270 ' 

280 xa=l:ya=l:IF INT(RND*2)=1 THEN xa=-xa 

290 PEN 1: GOSUB 250 

300 ORIGIN 0,400 

310 x=bx+4:y=ll:xl=x:yl=y 

320 ' 

330 ' 

340 xl=x+xa: yl=y+ya 
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350 IF xl=3 05 xl=38 THEN xa=-xa 

360 GOSUB 540 

370 IF yl=24 AND xl>bx+l AND xl<bx+6 THEN ya=-ya: yl=yl-2- SOUN 

D 130,44,8,7, l,l:a=((x>bx+5)0R(x<bx+2)): IF a=-l THEN xa=x 

a*a: xl=xl+xa: yl=yl+l 
380 IF y=25 THEN LOCATE x,y: PRINT" " : GOTO 500 
390 GOSUB 250 

400 t=TEST((16*xl)-l,-(16*yl)-l) 

410 IF t<>0 THEN ya=-ya:xz=xl:yz=yl:yl=yl+ya: GOSUB 590: IF t=2 

THEN puntos=puntas+10: GOSUB 660 
420 IF t=3 THEN puntos=puntos+20: GOSUB 660 
430 IF t=l THEN puntos=puntos+5: GOSUB 660 
440 IF yl=l THEN ya=l 

450 LOCATE x,y: PRINT" ": LOCATE xl.yl: PRINT CHP$ (231 > : x=xl: y=y 

1 J 

460 IF y=l OR x=3 OR x=38 THEN SOUND 129,78,8,7,1,1 
470 GOTO 340 
480 ' 
490 ' 
500 pelotas=pelatas-l: SOUND 132, 19, 46, 12, 2, 2: IF pelotas=0 THE 

N GOTO 620 
510 GOSUB 660: GOTO 280 
520 ' 
530 ' 
540 IF (INKEY(8)=0 OR INKEY(74)=0> AND bx>2 THEN bx=bx-2:RETU 

RN 
550 IF CINKEY(1>=0 OR INKEY(75>=0) AND bx<32 THEN bx=bx+2:RET 

URN 
560 RETURN 
570 ' 
580 ' 

590 LOCATE xz.yz: PRINT" ": RETURN 
600 ' 
610 ' 

620 IF puntos>=maximo THEN maxima=puntos 
630 GOSUB 660: puntos=0:pelotas=5: GOTO 130 
640 ' 
650 ' 
660 SOUND 130,0,20, 13, 3,0, 31: LOCATE 1,25: PRINT "Maxima" ; maxim 

o; 
670 LOCATE 15, 25: PRINT "Puntos" ; puntos: LOCATE 30, 25: PRINT"Pel 

atas" ; pe lotas: RETURN 
680 LOCATE 3, 23: PRINT"Pulse barra espacladara para erapezar" : R 

ETURN 
690 LOCATE 1,25: PRINT SPACES (40) ;: RETURN 
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Bombardero 

Una variation sobre un tema clasico. Para un jugador contra el ordenador. Solo teclado. 



10 'BOMBARDERO, par Dave Town 
20 'copyright (c) AMSOFT 19ft4 
30 ' 

40 MODE 1:CLS:INK 0,0:BORDER 0: INK 1,18: INK 2,6: INK 3,4: INK 5 
,15: INK 6,2: INK 7,24: INK 8,8: INK 9,26: INK 10, 10: INK 11 2<Z>- 
INK 12, 12 

50 SYMBOL AFTER 240: SYMBOL 241, 440, 460, 470, 47F, &7F, &EF, 47 40- 

SYMBOL 242,40,432,47A,4FE,4FA,4F2,4E0,40 
60 puntos=0 : maximo=0: avi$=CHR$ (241 ) +CHR$ (242) : x=2 : y=2 • cae=0 • a 

=2:b=2 
70 GOSUB 480 
80 CLS 

90 PEN 2: LOCATE 1, 15: IBPlTT'Elija nivel: <d (AS) a 5 (PRINCIPIA 

NTE) ", nivel 
100 IF nivel<0 OR nivel>5 THEN GOTO 90 
110 nivel=nivel+10 
120 LOCATE 1,15: PRINT CHR$ (18) ;: LOCATE 1, 15: INPUT"Elija veloc 

idad: (MAX) a 100 (MIN) " , vel 
130 IF vel>100 OR vel<0 GOTO 120 
140 ' 

150 'Edificios 
160 ' 
170 MODE 0:FOR base=5 TO 15: FOR altura=21 TO INT(RND(l)*8+niv 

el) STEP- 1: LOCATE base, altura: PEN base-2:PRINT CHR$(143)+ 

CHRM8)+CHR$(11)+CHR$(244) ; : NEXT: NEXT 
180 PLOT 0,20, 4: DRAW 640,20,4 
190 LOCATE 1,25: PEN 2: PRINT" PUNTOS" ; puntos; : LOCATE 12,25: PRI 

NT" MAX" jmaximo; 
200 ' 

210 'Juego 
220 * 

230 LOCATE x-l,y: PRINT" "; 
240 PEN 1: LOCATE x,y: PRINT avi$;:PEN 2 
250 IF y=21 AND x=15 THEN GOTO 290: ELSE GOTO 340 
260 ' 

270 'Aterriza 
280 ' 

290 FOR c=0 TO 1000: NEXT 

300 puntos=puntos+100- (nivel*2) : nivel=nivel-l: x=2: y=2: a=2: b=2 
: cae=0 
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400 



310 IF nivel<10 THEN nivel=10: vel=vel-20 

320 IF vel<0 THEN vel=0 

330 GOTO 150 

340 FOR c=0 TO vel:NEXT 

350 x=x+l 

360 IF x=18 THEN LOCATE x-l,y: PRINT CHR$ (18) ; : x=2: y=y+l : LOCAT 
E x,y:PEN 1: PRINT avi$;:PEN 2 

370 a$=INKEY$:IF a$ = " " AND cae=0 THEN cae=l: b=y+2: a=x 

380 IF y=21 THEN cae=0 

390 IF cae=l THEN LOCATE a, b: PRINT CHR$ (252) ;: LOCATE a,b-l:PR 
INT" ";:b=b+l:IF b>21 THEN LOCATE a, b: PRINT" ";: LOCATE a, 
b-1: PRINT" "; : a=0 : b=0: cae=0 : SOUND 3,4000,10,12,0,0,10 
ga= (a-0 . 5 ) *32 : gb=400- (b*16 ) : bomba=TEST (ga , gb) 

410 IF bomba>0 THEN GOTO 670 

420 gx= ( (x+1 . 5)*32) : gy=408- (y*16> : choque=TEST (gx, gy) 

430 IF chaque>0 THEN GOTO 570 

440 GOTO 23"0 

450 ' 

460 ' Instruccianes 

470 ' 

480 LOCATE 1,2: PEN 1: PRINT"Usted esta pilotando un avion sobr 
e una ciudad desierta y tiene que pasar sobre los edifici 
os para aterrizar y repos- tar. Su avion se mueve de iz 
quierda a derecha. ";: PRINT 

490 PRINT: PRINT" Al llegar a la derecha, el avion vuelve a sal 
ir por la izquierda, pero MAS BAJO, Dispone de un numero 1 
imitado de bombas y puede hacerlas caer sobre los edifi- 
cios pulsando la BARRA ESPACIADORA. ";: PRINT 

500 PRINT: PRI NT" Cada vez que aterriza, sube la altura de lo 
s edificios y la velocidad. ";: PRINT: PRINT: PRINT" UNA VEZ D 
ISPARADA UNA BOMBA, YA NO PUEDE DISPARAR OTRA MIENTRAS NO 
HAYA EXPLOSIO-NADO LA PRIMERA! ! ! ! " ; 

510 PEN 2: LOCATE 1 , 24: PRINT: PRINT"Pulse una tecla para empeza 
r."; 

520 a$=INKEY$:IF a$="" GOTO 520 

530 RETURN 

540 ' 

550 'Colision 

560 ' 

570 LOCATE x-l,y: PRINT CHR$ (32)+CHR$ (32)+CHR$ (32)+CHR$ (253 )+C 
HR$ (8 ) +CHRS (238 ) +CHR$ (8 ) ; 

580 FOR t=l TO 10: SOUND 7, 4000, 5, 15, 0, 0, 5: PEN t: PRINT CHR$ (25 
3)+CHR$(8)+CHR$(238)+CHR$(8)+CHR$(32)+CHR$(8); : FOR tm=0 T 
50: NEXT: NEXT: PEN 2 

590 CLS: LOCATE 1, 5: PR I NT" Ha conseguido" ; puntos; "puntos. " 
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600 IF puntos>maximo THEN maximo=puntas: LOCATE 1 , 8: PRIIT"BATI 

EL RECORD! ! " ; 
610 puntos=0: LOCATE 1 , 12: PRINT'Pulse V para volver a empezar" 

620 a$=INKEY$:IF a$="v" OR a$="V" GOTO 630 ELSE GOTO 620 

630 PEN l:MODE 1 : x=2: y=2: a=2: b=2: GOTO 90 

640 ' 

650 'Edificio bombardeado 

660 ' 

670 LOCATE a, b-1: PRINT" " +CHR$ (8) ; : PEN 4: FOR tr=l TO INT(RND( 
l)*3)+l:puntos=puntos+5: SOUND 3,4000, 10, 12,0,0, 10: LOCATE 
a,b:FOR t=0 TO 4:PRINT CHR$ (253)+CHR$ (8)+CHR$ (32)+CHR$ (8) 
; :NEXT:b=b+l 

680 IF b=24 THEN b=b-l 

690 NEXT 

700 LOCATE 7,25:PRINT puntos; ; cae=0; a=x: b=y: GOTO 230 
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Amthello 



El juego de la reflexion. Trate de rodear y capturar los cuadrados de su oponente sin dejar 
los suyos al descubierto. Para un jugador contra el ordenador. Solo teclado. 

10 'AMTHELLO, por M. J. Gribbins 

20 'copyright (c) AMSOFT 1984 

30 ' 

40 BORDER 14 

50 CLEAR 

60 MODE 1:PEN 0: PAPER 1:CLS 

70 INK 0,0: INK 1,14; INK 2, 18: INK 3,26 

80 LOCATE 2, 3: PEN 3: PRINT" A" : LOCATE 3, 4: PR INT" M" : LOCATE 4,5;P 

RIFT'T": LOCATE 5, 6: PRINT" H" 
90 LOCATE 6, 7: PRINT" E" .'LOCATE 7, 8: PRINT" L" : LOCATE 8,9:PRINT"L 

": LOCATE 9, 10:PRINT"O" 
100 VINDOV #1,2,39,22,25:PAPER #1,1:PEN #1,0:CLS#1 
110 PEN 

120 LOCATE #1,5,1:PRINT#1,"LAS NEGRAS SIEMPRE EIPIEZAN" 
130 LOCATE #1,4,3:PRINT#1,"ELIJA BLANCAS <B> NEGRAS <N>" 
140 b$=INKEY$:IF b$="" THEN 140 

150 IF b$="B" OR b$="b" THEN q%=3: n%=0: GOTO 210 
160 IF b$="N" OR b$="n" THEN q%=0: n%=3: GOTO 210 
170 CLS#1: LOCATE #1,4,3 
180 PRINT#1," SOLO BLANCAS NEGRAS" 
190 FOR t=0 TO 1000: NEXT t 
200 GOTO 140 

210 DIM c%(10, 10),p%(9,9),cl%(8),c2%(8),cx%(9),cy%(9) 
220 i 1%=2 : j 1%=2 : i2%=7 : j 2%=7 
230 FOR i%=0 TO 9 
240 c%(i%,o%)=6:c%(0, i%)=6 
250 c%(9,i%)=6:c%(i%,9)=6 
260 NEXT i% 
270 FOR i%=l TO 8 
280 READ cl%(i%),c2%<i%) 
290 FOR j%=l TO 8 
300 READ p%<i %,]%) 
310 c%(i%,j%)=6 
320 NEXT j%:NEXT i% 

330 c%<4,4)=3:c%<4,5)=0:c%(5,4)=0:c%<5,5)=3 
340 FOR k%=l TO 58 
350 READ ar%,br%,cr%,dr% 
360 PLOT ar%,br%:DRAV cr%,dr%,0 
370 NEXT k% 
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380 GOSUB 1460- 
390 IF q%=3 GOTO 770 

400 CLS#1: INPUT #1," ELIJA FILA " ; e% 
410 IF e%<l OR e%>8 GOTO 400 

420 LOCATE #1,1, 3; INPUT #1," ELIJA COLUMNA " ; d% 
430 IF d%<l OR d%>8 GOTO 420 
440 IF c%(d%,e%>=6 GOTO 480 

450 CLS#1: LOCATE #1 , 5, 2: PRINT#1, "ESE CUADRADO YA ESTA OCUPADO 
I » 

460 FOR t=l TO 1000: NEXT t 

470 GOTO 400 

480 PLOT 270+(30*d%),70+(30*e%):DRAV 290+<30*d%> , 89+ (30*e%) , q 

% 
490 PLOT 290+(30*d%),70+(30*e%):DRAV 270+ (30*d%) , 89+ (30*e%) , q 

% 
500 GOTO 540 

510 FOR m%=0 TO 19 STEP 2: PLOT 270+(30*d%) , 70+m%+ (30*e%) 
520 DRAV 290+(30*d%),70+m%+(30*e%),6:NEXT m% 
530 GOTO 400 
540 vrx%=0 
550 FOR k%=l TO 8 
560 vr%=0 : c3%=d% : c4%=e% 
570 c3%=c3%+cl% (k%) : c4%=c4%+c2% (k%) 
580 IF c%(c3%,c4%)=n% GOTO 590 ELSE 600 
590 vr%=vr%+l:GOTO 570 

600 IF c%(c3%,c4%)=6 GOTO 610 ELSE 620 
610 NEXT k%:GOTO 670 
620 IF vr%=0 GOTO 610 ELSE 630 
630 vrx%=vrx%+vr% 

640 c3%=c3%-cl%(k%> : c4%=c4%-c2%(k%) 
650 IF c%(c3%,c4%)=6 GOTO 610 ELSE 660 
660 c%(c3%,c4%)=q%:GOTO 640 
670 IF vrx%=0 GOTO 680 ELSE 710 
680 CLS#l:PRINT#l,"ESO NO ES POSIBLE" 
690 FOR t=l TO 1000: NEXT t 
700 GOTO 510 

710 e%=e%: d%=d%: vrx%=vrx% 

720 CLS#1:PRINT#1,"USTED VA A LA LINEA " ; e% 
730 PRINTfl," Y A LA COLUMNA " ; d% 
740 LOCATE #1 , 2, 4: PRINT#1, "CON LO QUE CONSIGUE " ;vrx%;" CUADR 

ADO(S)" 
750 c%(d%,e%)=q%: GOSUB 1710 
760 GOSUB 1460 

770 CLS#1: LOCATE #1 , 10, 2: PRINTfl, " AHORA HE TOCA A MI ...!" 
780 p%=0 : vrx%=0 : vry%=0 
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790 IF il%*jl%=l AND i2%*j2%=64 GOTO 860 

800 FOR k%=2 TO 7 

810 IF c%<2,k7.)<>6 THEN il%=l 

820 IF c%<7,k%)<>6 THEN i2%=8 

830 IF c%(k%,2)<>6 THEN jl%=l 

840 IF c%(k%,7)<>6 THEN j2%=8 

850 NEXT k% 

860 FOR i%=il% TO i2% 

870 FOR j%=jl% TO j2% 

880 IF c%<i%,j%)=6 GOTO 1030 

890 NEXT j%:NEXT i% 

900 IF p%>0 THEN 1000 

910 IF pas%=l GOTO 920 ELSE 940 

920 CLS#l:PRINT#l,"BLOQUEADO! YO TAMBIEN TENGO QUE PASAR. FIN 

DE LA PART I DA" 
930 FOR t=l TO 1000: NEXT t:GOTO 1550 
940 CLS#1: LOCATE #1, 18, 2: PRINT#1, "TENGO QUE PASAR" 
950 GOSUB 2720 

960 IF pas%=l GOTO 970 ELSE 990 
970 CLS#l:PRINT#l,"BLOQUEADO! USTED TAMBIEN TIENE QUE PASAR. 

FIN DE LA PARTIDA." 
975 RETURN 

980 FOR t=l TO 1000: NEXT t:GOTO 1550 
990 GOTO 400 

1000 IF lc%=0 THEN lc%=l: RANDOMIZE lc%: rl%=RND(lc%) 
1010 cxl%=cx%<rl%) : cx2%=cy%(rl%) 
1020 GOTO 1220 
1030 vrx%=0 
1040 FOR k%=l TO 8 
1050 vr%=0:c3%=i%:c4%=j% 
1060 c3%=c3%+cl%(k%) : c4%=c4%+c2%(k%) 
1070 IF c%(c3%,c4%)=q% GOTO 1080 ELSE 1090 
1080 vr%=vr%+l:GOTO 1060 

1090 IF c%(c3%,c4%)=6 GOTO 1100 ELSE 1110 
1100 NEXT k%:GOTO 1130 
1110 IF vr%=o% GOTO 1100 ELSE 1120 
1120 vrx%=vrx%+vr%:GOTO 1100 
1130 IF vrx%=0 GOTO 890 
1140 IF p%(i%,j%Xp% GOTO 890 
1150 IF p%(i%,j%)>p% GOTO 1160 ELSE 1170 
1160 p%=p%(i%, j%) : vry%=vrx%: lc%=0: cx%(0)=i%: cy%(0)=j%: GOTO 89 


1170 IF vry%>vrx% GOTO 890 
1180 IF vry%<vrx% GOTO 1190 ELSE 1200 
1190 lc%=0: vry%=vrx%:cx%(0)=i%:cy%(0)=j%:GOTO 890 
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1200 lc%=lc%+l : cx% <lc%) =i%: cy% <lc%) =j % 

1210 GOTO 890 

1220 cx27,=cx2%: cxl%=cxl%: vry%=vry7. 

1230 CLS#l:PRINT#l,"YO VOY A LA FILA " ; cx2% 

1240 PRINTfl," Y A LA COLUMNA " ; cxl% 

1250 LOCATE #1, 1, 4: PRINT#1, "CON LO QUE CONSIGO ";vry%;" CUADR 

ADO(S)" 
1260 PLOT 270+(30*cxl%) , 70+ (30*cx2%) : DRAV 290+ (30*cxl%) , 89+ (3 

0*cx27,) , n% 
1270 PLOT 290+(30*cxl7.),70+(30*cx2%):DRAV 270+ (30*cxl%) , 89+ (3 

0*cx2%),n% 
1280 FOR t=l TO 1000: NEXT t 
1290 FOR k%=l TO 8 
1300 vr%=0: c37.=cxl%: c4%=cx2% 
1310 c3%=c3%+cl%(k%) : c4%=c4%+c2%(k%) 
1320 IF c%(c37.,c4%)=q7, GOTO 1330 ELSE 1340 
1330 vr%=vr%+l: GOTO 1310 

1340 IF c%(c3%,c4%)=6 GOTO 1350 ELSE 1360 
1350 NEXT k%:GOTO 1400 
1360 IF vr%=0 GOTO 1350 
1370 c3%=c3%-cl%(k%) : c4%=c4%-c2%(k%) 
1380 IF c%(c3%,c4%)=6 GOTO 1350 
1390 c%(c37,,c4%)=n%:GOTO 1370 
1400 c%<cxl%,cx2%)=n% 
1410 GOSUB 2720 
1420 GOSUB 1460 

1430 IF pas%=l GOTO 1440 ELSE 1450 
1440 CLS#1:PRINT#1," USTED TIENE QUE PASAR" : FOR t=l TO 100 

0:NEXT t:GOTO 770 
1450 GOTO 400 
1460 FOR i%=l TO 8 
1470 FOR j%=l TO 8 
1480 FOR m%=l TO 19 STEP 2 

1490 z%=270+ (30*i%) : h%=70+ (30*j%) : w%=h%+m% 
1500 PLOT z%,w%:DRAV z%+20, w%, c%(i%, j%) 
1510 NEXT m%:NEXT j%:NEXT i% 
1520 x7,=x7,+ l 
1530 IF x%=61 GOTO 1550 
1540 RETURN 
1550 cq%=0:cn%=0 
1560 FOR i%=l TO 8 
1570 FOR j%=l TO 8 

1580 IF c%(i%, j%)=q% THEN cq%=cq%+l 
1590 IF c%(i%,j%)=n% THEN cn%=cn%+l 
1600 NEXT j%:NEXT i% 
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1610 IF cq%>cn% GOTO 1680 

1620 IF cq%=cn% GOTO 1630 ELSE 1650 

1630 CLS#1: LOCATE #1 , 25 , 2 : PRINT#1 , "BLOQUEADO" 

1640 END 

165® CLS#1: LOCATE #1 , 5, 1 : PRINT#1 , "USTED TIENE ";cq%;" CUADRAD 

OS. YO TENGO " ; cn7, 
1660 LOCATE #1 , 11 , 3: PRINT#1 , " YO HE GANADO ... !!!" 
1670 END 
168® CLS#1: LOCATE #1, 5, 1 : PRINT#1, "USTED TIENE ";cq%;" CUADRAD 

OS. YO TENGO " ; cn% 
1690 LOCATE #1, 5, 3: PRINT#1, " MUY BIEN. USTED HA GANADO ... !!! 

II 

1700 END 

1710 IF c%(2,2)=q% AND (c%(3,l)=n% OR c%(l,3)=n%) GOTO 1720 E 

LSE 1730 
1720 p%(3, l)=l:p%(l,3)=l 
1730 IF c%(7,7)=q% AND (c%(8,6)=n% OR c%(6,8)=n%) GOTO 1740 E 

LSE 1750 
1740 p%(8,6)=l:p7<.(6,8) = l 
1750 IF c%(2,7)=q% AND (c%(l,6)=n% OR c%(3,8)=n%) GOTO 1760 E 

LSE 1770 
1760 p%(l,6)=l:p%(3,8)=l 
1770 IF c%(7,2)=q% AND <c%(6,l)=n% OR c%(8,3)=n%) GOTO 1780 E 

LSE 1790 
1780 p%(6, D=l:p7,(8,3) = l 

1790 IF d%=l OR d%=8 OR e%=l OR e%=8 GOTO 1820 
1800 IF cxl%=l OR cxl%=8 OR cx2%=l OR cx2%=8 GOTO 1820 
1810 RETURN 

1820 FOR j%=l TO 8 STEP 7 
1830 FOR i%=2 TO 7 

1840 IF c%(i%J%)=n% GOTO 1850 ELSE 1860 
1850 p% (i%+l , j%) =21 : p% (i%-l , j%)=21 
1860 IF c%(j%,i%)=n% GOTO 1870 ELSE 1880 
1870 p%(j%, i%+l)=21:p%(j%, i%-l)=21 
1880 NEXT i% 
1890 FOR i%=2 TO 7 

1900 IF c%(i%,j%)=q% GOTO 1910 ELSE 1920 
1910 p% ( i%+l , j %) =2 : p% (i%- 1 , j %) =2 
1920 IF c%(j%,i%)=q% GOTO 1930 ELSE 1940 
1930 p% ( j%, i%+l ) =2: p% (j%, i%-l ) =2 
1940 NEXT i%:NEXT j% 

1950 p%(l,2)=l:p%(l,7)=l:p%(2, l)=l:p%(7, 1)=1 
1960 p% (2, 8 ) =1 : p% (7 , 8) = 1 : p% (8 , 2 ) =1 : p% (8 , 7 ) = 1 
1970 FOR i%=2 TO 7 
1980 IF c%(l, i%-l)=q% AND c%(l , i%+l)=q% THEN p%(l,i%)=25 



A2/10 Que usted lo disfrute . . . 



1990 IF c%(8, i%-l)=q% AND c%(8, i%+l)=q% THEN p%(8,i%)=25 

2000 IF c%(i%-l,l)=q% AND c%(i%+l , l)=q% THEN p%(i%,l)=25 

2010 IF c%(i%-l,8)=q% AND c%(i%+l, 8)=q% THEN p%(i%,8)=25 

2020 NEXT i% 

2030 FOR j%=l TO 8 STEP 7 

2040 FOR i%=4 TO 8 

2050 IF c%(j%, i%)On% GOTO 2140 

2060 ic%=i%-l:IF c%(j%,ic%)=6 GOTO 2140 

2070 IF c%(j7,, ic%)=q% GOTO 2080 ELSE 2090 

2080 ic%=ic%-l:GOTO 2070 

2090 IF c%(j%,ic%)=6 GOTO 2110 

2100 GOTO 2140 

2110 IF ic%=0 GOTO 2140 

2120 IF c%(j%, i%+l)=q% AND c%(j%, ic%-l)=6 GOTO 2140 

2130 p%(j%, ic%)=26 

2140 IF c%(i%,j%)On% GOTO 2230 

2150 ic%=i%-l:IF c%(ic%,j%)=6 GOTO 2230 

2160 IF c%(ic%, j%)=q% GOTO 2170 ELSE 2180 

2170 ic%=ic%-l:GOTO 2160 

2180 IF c%(ic%,j%)=6 GOTO 2200 

2190 GOTO 2230 

2200 IF ic%=0 GOTO 2230 

2210 IF c%(i%+l, j%)=q% AND c%(ic%-l, j%)=6 GOTO 2230 

2220 p%(ic%, j%)=26 

2230 NEXT i% 

2240 FOR i%=l TO 5 

2250 IF c%(j%,i%)On% GOTO 2340 

2260 ic%=i%+l:IF c%(j%,ic%)=6 GOTO 2340 

2270 IF c%(j%, ic%)=q% GOTO 2280 ELSE 2290 

2280 ic%=ic%+l:GOTO 2270 

2290 IF c%(j%,ic%)=6 GOTO 2310 

2300 GOTO 2340 

2310 IF ic%=9 GOTO 2340 

2320 IF c%(j%, i%-l)=q% AND c%(j%, ic%+l)=6 GOTO 2340 

2330 p%(j%,ic%)=26 

2340 IF c%(i%, j%)On% GOTO 2430 

2350 ic%=i%+l:IF c%(ic%,j%)=6 GOTO 2430 

2360 IF c%(ic%, j%)=q% GOTO 2370 ELSE 2380 

2370 ic%=ic%+l:GOTO 2360 

2380 IF c%(ic%,j%)=6 GOTO 2400 

2390 GOTO 2430 

2400 IF ic%=9 GOTO 2430 

2410 IF c%(i%-l, j%)=q% AND c%(ic%+l , j%)=6 GOTO 2430 

2420 p%(ic%, j%)=26 

2430 NEXT i%:NEXT j% 
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2440 IF c%(l,l)=n% GOTO 2450 ELSE 2460 

2450 FOR i%=2 TO 6: p%(l , i%)=20: p%(i%, 1)=20: NEXT i% 

2460 IF c%(l,8)=n% GOTO 2470 ELSE 2480 

2470 FOR i%=2- TO 6: p%(i%, 8)=20: p%(l, 9-i%)=20: NEXT i% 

2480 IF c%(8,l)=n% GOTO 2490 ELSE 2500 

2490 FOR i%=2 TO 6: p%(9-i%, 1)=20: p%(8, i%)=20: NEXT i% 

2500 IF c%(8,8)=n% GOTO 2510 ELSE 2520 

2510 FOR i%=3 TO 7: p%(i%, 8)=20: p%<8, i%)=20: NEXT i% 

2520 IF c%(l,l)<>6 THEN p%(2,2)=5 

2530 IF c%a,8)<>6 THEN p%(2,7)=5 

2540 IF c%(8,l)<>6 THEN p%(7,2)=5 

2550 IF c%(8,8><>6 THEN p%(7,7)=5 

2560 p%(l, l)=30:p%(l,8)=30:p%(8, 1 ) =30: p% (8, 8) =30 

2570 FOR i%=3 TO 6 

2580 IF c%<l,i%)=n% THEN p%(2,i%)=4 

2590 IF c%(8,i%)=n% THEN p%(7,i%)=4 

2600 IF c%(i%,l>=n% THEN p%(i%,2)=4 

2610 IF c%(i%,8)=n% THEN p%(i%,7)=4 

2620 NEXT i% 

2630 IF c%(7,l)=q% AND c%<4,l)=n% AND c%(6,l)=6 AND c%(5,l)=6 

THEN p%(6, 1)=26 
2640 IF c%(l,7)=q% AND c%(l,4)=n% AND c%(l,6)=6 AND c%(l,5)=6 

THEN p%(l,6)=26 
2650 IF c%(2,l)=q% AND c%(5,l)=n% AND c%(3,l)=6 AND c%(4,l)=6 

THEN p%(3, 1)=26 
2660 IF c%<l,2)=q% AND c%(l,5)=n% AND c%(l,3)=6 AND c%(l,4)=6 

THEN p%(l,3)=26 
2670 IF c%(8,2)=q% AND c%(8,5)=n% AND c%(8,3)=6 AND c%(8,4)=6 

THEN p%(8,3)=26 
2680 IF c%(2,8)=q% AND c%(5,8)=n7, AND c%(3,8)=6 AND c%(4,8)=6 

THEN p%(3,8)=26 
2690 IF c%(8,7)=q% AND c%(8,4)=n7, AND c%<8,5)=6 AND c%(8,6)=6 

THEN p%(8,6)=26 
2700 IF c%(7,8)=q% AND c7,(4,8)=n% AND c%(5,8)=6 AND c%(6,8)=6 

THEN p%(6,8)=26 
2710 RETURN 
2720 pas%=0 
2730 FOR i%=l TO 8 
2740 FOR j%=l TO 8 
2750 IF c%(i%,j%)=q% GOTO 2780 
2760 NEXT j%:NEXT i% 
2770 pas%=l: RETURN 
2780 FOR k%=l TO 8 
2790 vr%=0:c3%=i%:c4%=j% 
2800 c3%=c3%+cl%(k%) : c4%=c4%+c2%(k%) 
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2810 IF c3%<1 OR c3%>8 GOTO 2820 ELSE 2830 

2820 NEXT k%:GOTO 2760 

2830 IF c4%<1 OR c4%>8 GOTO 2820 ELSE 2840 

2840 IF c%(c3%,c4%)=n% GOTO 2850 ELSE 2860 

2850 vr%=vr%+l:GOTO 2800 

2860 IF c%(c3%,c4%)=q% GOTO 2820 ELSE 2870 

2870 IF vr%>0 THEN RETURN 

2880 GOTO 2820 

2890 DATA 1,0,30,1,20,10,10,20,1,30,1,1,1,1,3 

2900 DATA 3,3,3,1,1,0,1,20,3,5,5,5,5,3,20,-1,1,10,3,5 

2910 DATA 0,0,5,3,10,-1,0,10,3,5,0,0,5,3,10,-1 

2920 DATA -1,20,3,5,5,5,5,3,20,0,-1,1,1,3,3,3,3,1,1,1,-1,30,1 

,20, 10,10,20,1,30 
2930 DATA 263, 100,263, 120,270, 130,255, 130,255, 130,255, 140,255 

), 140 

), 140,270, 150,270, 150,255, 150,255, 160,270, 160,270 

., 180 

), 180,255, 180,270, 170,255, 170,270, 190,270,210,270 

,,200 

>, 200, 255, 210, 255, 220, 270, 220, 270, 220, 270, 230, 270 

>,230 

>, 230, 255, 240, 255, 240, 270, 240, 255, 250, 270, 250, 270 

),260 

>, 260, 255, 260, 255, 250, 255, 270, 270, 280, 270, 300, 270 

>,300 

i, 310, 255, 330, 255, 330, 270, 330, 270, 330, 270, 310, 270 

i, 310 

i, 320, 270, 320 

1,355,310,375,350,355,335,355,335,355,335,365,335 

),365 

>, 365, 350, 375, 350, 375, 335, 375, 365, 355, 380, 355, 380 

),375 

), 375, 365, 375, 380, 365, 365, 365, 410, 355, 410, 375, 410 

i,365 

>, 365, 395, 375, 425, 355, 440, 355, 440, 355, 440, 365, 440 

>,365 

>, 365, 425, 375, 425, 375, 440, 375, 455, 375, 455, 355, 455 

.,355 

), 355, 470, 365, 470, 365, 455, 365, 485, 375, 500, 375, 500 

.,355 

> , 375 ,515, 355 , 5 15 , 355 , 530 , 355 , 530 , 355 , 530 , 375 , 530 

,,375 

>, 365, 530, 365 



,140,270, 
2940 DATA 270, 

, 160,270, 
2950 DATA 270, 

,200,255, 
2960 DATA 255, 

,230,255, 
2970 DATA 255, 

,250,270, 
2980 DATA 270, 

,300,255, 
2990 DATA 255, 

,310,255, 
3000 DATA 255, 
3010 DATA 310, 

,365,350, 
3020 DATA 350, 

,355,380, 
3030 DATA 380, 

,365,395, 
3040 DATA 395, 

,365,425, 
3050 DATA 425, 

,355,470, 
3060 DATA 470, 

,375,500, 
3070 DATA 515, 

,375,515, 
3080 DATA 515, 
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Apendice 3 
Indice 



(Las referencias corresponden a los mimeros de capftulo y de pagina; por ejemplo, 1 .42 
significa capitulo 1 pagina 42.) 

A ABS 3.3 

AFTER 3.3 5.25 

Alimentation, interruptor 1 .4 1.5 

Altavoces externos 1.8 1 .54 

Ampliaciones del sistema residentes 4.41 

Amplificador externo 1.8 4.37 

AND 3.4 5.15 

ASC 3.5 

ASCII 4.8 4.21 

ASCII, caracteres 4.8 4.9 5.11 

ASCII, ficheros 3.6! 4.30 

ATN 3.5 

Auriculares 1.8 1 .54 

AUTO 2.8 3.5 



BASIC 1.20 3.1 4.28 5.5 

BINS 3.6 

bit 5.7 

BORDER 1.39 3.6 4.5 

BORR, tecla 1.10 

Borrado de los canales de sonido 3.73 5.32 

BREAK 3.6 

BRILLO, control 1.4 

Byte 5.7 



CALL 3.7 

Capacidad de los discos 1.41 

Caracteres 1 .46 4.9 5.11 

Caracteres de control 4.3 

Caracteres definibles por el usuario 3.68 5.17 

Caracteres expansibles 3.32 4.22 

Caracteres transparentes 4.4 

CHAIN 3.7 

CHAIN MERGE 3.8 

CHR$ 1.45 3.8 5.12 

CINT 3.9 

Circunferencias 1 .49 

CLEAR 3.9 

CLG 3.9 



Indice A3/1 



CLOSEIN 2 9 3 10 

CLOSEOUT .' .' ^ 2^8 3 JO 

CLR, tecla j J2 

CLS 1.20 3.10 4.3 

Codigo de maquina 4 6 

Codigos de control 4.2 4.3 

Colas de sonido 3.45 3.66 4.7 5.31 5.37 

Colores 1.381.41 

Colores parpadeantes 1 .42 3,64 

Conexion de una clavija de red 1.1 

Conexion del ordenador 12 

Conexion de perifericos 1 7 4 36 4 37 4 38 

CONT '....'.. 2.1 1 4^29 

CONTRASTE, control 14 

COPIA, tecla 1 26 

COS 3. n 

CREAL 3 11 

Cursor, teclas del 1 9 



D DATA 3.12 4.28 5.26 

DEF FN 3.12 4.30 

DEFINT 3. 13 

DEFREAL 313 

DEFSTR ' ' 3 j4 

DEG ' 3J4 

DELETE 3 j4 

DI 3.15 5.26 

DIM 2.3 3.16 4.29 

DRAW 1.4 8 3.i 6 

DRAWR 3 17 



Edition de programas 1 .25 

EDIT 1.25 3.17 

EI 3.17 5.26 

ELSE 1.27 3.18 

ENC, piloto 1.4 1.5 

END 3.18 

ENT 1.58 3.18 5.35 

ENV 1.56 3.20 5.32 

Envolvente de tono 1.58 3.18 5.35 

Envolvente de volumen 1.56 3.20 5.32 

EOF 3.22 4.30 

ERASE 3.22 

ERL 3.22 

ERR 3.23 

ERROR 3.23 

ESC, tecla 1.12 

Escritura transparente 4.4 
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Estereo, zocalo 4.37 

Estereofoni'a 1.8 1.54 

EVERY 3.24 5.26 

EXP 3.24 

E/S 4.36 4.44 

E/S, zocalo 1 .8 1 .54 



Ficheros ASCII 3.61 4.30 

Ficheros de BASIC 3.61 

Ficheros binarios 3.61 

Ficheros protegidos 3.61 

FIJA MAYS, tecla 1.10 

FIX 3.24 

FN 3.25 

FOR 1.28 3.25 4.28 4.30 5.12 

FRE 3.25 



GOSUB 1.29 3.26 

GOTO 1.22 3.26 

Grabacion de variables 2.9 3.78 

Graficos 1 .45 



H Hardware 4.42 

HEX$ 3.26 

HIMEM 3.26 4.42 



IF 1.27 3.27 

Impresoras 1.7 4.39 

INK 1.39 3.27 4.5 

INKEY 3.28 4.40 

INKEYS 2.11 3.29 4.40 

INP 3.29 

INPUT 1.23 2.2 3.29 4.29 

INSTR 2.4 3.30 

INT 3.31 

Interfaz serie 5.3 

Interrupciones 4.7 5.24 

INTRO, tecla 1.9 



JOY 3.31 4.40 

Joysticks 1.7 4.21 4.23 4.40 

JOYSTICK, zocalo 1.7 4.36 



KEY 3.32 4.22 

KEY DEF 3.32 4.22 4.40 
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LEFTS 3.33 

LEN 2.8 3.33 

LET 3.34 

LINE INPUT 3.34 

LIST 1.22 1.44 3.34 

Listas 2.3 3.16 3.22 4.29 

LOAD 3.35 

LOCATE 1.45 3.35 4.6 

LOG 3.36 

LOG10 3.36 

Logica 3.4 3.41 3.46 3.79 5.14 

LOWERS 3.36 



M Matrices 2.3 3.16 

MAX 3.37 

MAYS, teclas 1.10 

MEMORY 3.37 4.28 4.42 

Mensajes de error 4.28 

Menu 2.5 3.44 

MERGE 3.37 

MIDS 3.38 

MIN 3.39 

MOD 1.32 3.39 

MODE 1.38 3.39 4.3 

Modos de tinta 4.5 

Modulador/fuente de alimentation (MP1) 1.3 1.5 1.38 1.54 

Monitor 1.2 

MONITOR, zocalo 1.2 1.3 4.37 

MOVE 1.49 3.40 

MOVER 3.40 



N NEW 1.50 3.40 

NEXT 1.28 3.41 4.28 4.30 5.12 

NOT 3.41 5.14 

Notas musicales 4.24 

Niimeros aleatorios 3.59 

Niimeros binarios 5.6 

Niimeros de los errores 4.28 

Niimeros hexadecimales 5.9 



O ON BREAK GOSUB 3.42 

ON BREAK STOP 3.42 

ON ERROR GOTO 3.43 4.30 

ON GOSUB 2.5 3.43 

ON GOTO 3.44 

ON SQ GOSUB 3.44 4.7 5.38 

OPENIN 2.9 3.45 4.30 
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OPENOUT 2.8 3.45 4.30 

Operadores 1.30 5.15 

OR 3.46 5.15 

ORIGIN 1.51 3.46 

OUT 3.47 



Palabras clave 1 .20 3. 1 

PAPER 1.39 3.47 4.4 

PEEK 3.47 

PEN 1.39 3.48 4.4 

Perifericos 1.7 5.2 

PI 3.48 

Piloto (de la unidad de disco) 1.8 

Plantillas 4.32 4.33 4.34 4.35 

PLOT 1.47 3.48 

PLOTR 3.49 

POKE 3.49 

Potenciaci6n 1.33 1.35 

PRINT 1.21 3.50 5.18 

PRINT SPC 3.51 5.19 

PRINT TAB 3.51 5.19 

PRINT USING 3.51 5.20 

PUERTA DEL USUARIO, zocalo 1.7 4.36 



RAD 3.53 

Rafz cuadrada 1-33 3.66 

Raiz cubica 1.33 

RANDOMIZE 3.54 

READ 3.54 7.28 5.26 

RELEASE 3.55 5.36 

REM 1-28 2.2 3.55 

REMAIN 3.56 5.26 

RENUM 2.7 3.56 

RESTORE 3.57 5.28 

RESUME 3.57 4.30 

RESUME NEXT 3.58 

Retention de los canales de sonido 3.62 5.32 

RETURN 1.29 3.58 7.28 

RETURN, tecla 1.9 1.12 

RIGHTS 3.59 

RND 3.59 

ROM adicional 4.44 

ROUND 3.60 

RS232C 5.3 

RSX 4.41 

RUN 1.21 3.60 
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SAVE 3.61 

SGN 3.61 

SIN 3.62 

Sincronizacion de canales 3.62 5.31 

Sintetizador de voz 1.8 5.3 

Software 1.14 

SOUND 1.54 3.62 4.24 5.29 

SPACES 3.64 

SPC 3.64 5.19 

SPEED INK 3.64 

SPEED KEY 3.65 

SPEED WRITE 3.65 

SQ 3.66 5.38 

SQR 1.33 3.66 

STEP 1.28 3.66 

STOP 3.67 

STR$ 3.67 

STRINGS 3.67 

Suma de verificacion 5 27 

SWAP 3.68 

SYMBOL 3.68 4.5 5.17 

SYMBOL AFTER 3.70 4.42 

Syntax error 1.13 7.28 



TAB 3.70 5.19 

TAG 3.70 

TAGOFF 3.71 

TAN 3.71 

Teclado 1.9 4.21 4.22 4.23 4.40 

Teclas definibles por el usuario 3.32 4.21 4.22 4.23 

Televisor 1.3 1.5 1.54 

TEST 3.' 72 

TESTR 3.72 

THEN 1.27 3.72 

TIME 3.73 

TO 3^3 

TROFF 3.73 

TRON 3.73 



U UNIDAD DE DISCO, zocalo 1.8 4.38 

UNT 3.74 

UPPERS 3.74 

USING 3.74 5.20 



VAL 3.75 

Variables 1.24 4.31 5.12 

Variables, grabacion de 2.8 3.61 3.78 

Variables literales 1 .24 4.29 



A3/6 fndice 



Vibrato 5.34 

Volcado de pantalla 3.61 

VOLUMEN, control 1.8 1 .54 

VPOS 3.75 



W WAIT 3.75 

WEND 3.76 4.31 

WHILE 3.76 4.28 4.31 

WIDTH 3.76 

WINDOW 2.10 3.77 4.5 5.22 

WINDOW SWAP 3.77 5.23 

WRITE 2.8 3.78 5.19 



X XOR 3.79 5.17 

XPOS 3.79 



Y YPOS 3.80 



Z Zocalos de corriente continua 1.2 1.3 

ZONE 3.80 5.18 
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